Fontify :doc keywords as documentation
* lisp/emacs-lisp/lisp-mode.el (lisp-string-after-doc-keyword-p): Extend to :doc, too (bug#51230).
This commit is contained in:
parent
9f505c476e
commit
ef9fa3682a
1 changed files with 3 additions and 1 deletions
|
@ -591,6 +591,8 @@ containing STARTPOS."
|
|||
|
||||
(defun lisp-string-after-doc-keyword-p (listbeg startpos)
|
||||
"Return non-nil if `:documentation' symbol ends at STARTPOS inside a list.
|
||||
`:doc' can also be used.
|
||||
|
||||
LISTBEG is the position of the start of the innermost list
|
||||
containing STARTPOS."
|
||||
(and listbeg ; We are inside a Lisp form.
|
||||
|
@ -598,7 +600,7 @@ containing STARTPOS."
|
|||
(goto-char startpos)
|
||||
(ignore-errors
|
||||
(progn (backward-sexp 1)
|
||||
(looking-at ":documentation\\_>"))))))
|
||||
(looking-at ":documentation\\_>\\|:doc\\_>"))))))
|
||||
|
||||
(defun lisp-font-lock-syntactic-face-function (state)
|
||||
"Return syntactic face function for the position represented by STATE.
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue