mir/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

do nothing for man-plus.el. It still doesn't work

Browse Source
This commit is contained in:
MitchMarq42 2022-10-12 15:29:54 -08:00
parent eb9d298fcc
commit c6e8f0cf9a
1 changed files with 7 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
lisp/man-plus.el
View File

@ -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,7 +49,7 @@
(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)
@ -63,4 +63,3 @@
(provide 'man-plus)
;;; man-plus.el ends here
; LocalWords: nlpox