do nothing for man-plus.el. It still doesn't work
This commit is contained in:
parent
eb9d298fcc
commit
c6e8f0cf9a
@ -12,11 +12,11 @@
|
||||
|
||||
(defvar man-plus-highlights
|
||||
(let* (
|
||||
(manReference "[^()[:space:]]\\+(\\%([0-9][a-z]*\\|[nlpox]\\))")
|
||||
(manSectionHeading "^\\S.*$")
|
||||
(manHeader "^\\%1l.*$")
|
||||
(manSubHeading "^ \\{3\\}\\S.*$")
|
||||
(manOptionDesc "^\\s\\+\\%(+\\|-\\)\\S\\+"))
|
||||
(manReference "[^()[:space:]]\\\\+(\\\\%([0-9][a-z]*\\\\|[nlpox]\\\\))")
|
||||
(manSectionHeading "^\\\\S.*$")
|
||||
(manHeader "^\\\\%1l.*$")
|
||||
(manSubHeading "^ \\\\{3\\\\}\\\\S.*$")
|
||||
(manOptionDesc "^\\\\s\\\\+\\\\%(+\\\\|-\\\\)\\\\S\\\\+"))
|
||||
`(
|
||||
(,manReference . 'link)
|
||||
(,manSectionHeading . 'outline-1)
|
||||
@ -49,12 +49,12 @@
|
||||
(defun man-plus-setall ()
|
||||
"Do all of the things that Man wants. To be run as `Man-mode-hook'."
|
||||
(interactive)
|
||||
(setq font-lock-defaults '((man-plus-highlights))))
|
||||
(setq font-lock-defaults '(man-plus-highlights)))
|
||||
|
||||
(add-hook 'man-common-hook #'man-plus-setall)
|
||||
(add-hook 'man-common-hook #'turn-off-line-numbers)
|
||||
|
||||
(define-derived-mode man-plus-mode man-common "Man Plus"
|
||||
(define-derived-mode man-plus-mode man-common "ManPlus"
|
||||
"Custom child mode for man mode, structured like the `nvim' builtin plugin."
|
||||
(buffer-disable-undo)
|
||||
(auto-fill-mode -1)
|
||||
@ -63,4 +63,3 @@
|
||||
|
||||
(provide 'man-plus)
|
||||
;;; man-plus.el ends here
|
||||
; LocalWords: nlpox
|
||||
|
Loading…
Reference in New Issue
Block a user