mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-06 14:30:50 -08:00
* font-lock.el (lisp-font-lock-keywords-1): Match `deftheme'.
* emacs-lisp/lisp-mode.el (toplevel): Define docstring offset for `deftheme'. Fix docstring offsets for `define-ibuffer-filter' and `define-ibuffer-sorter'. (lisp-imenu-generic-expression): Add `deftheme' to types. * custom.el (customize-mark-to-save, customize-mark-as-set) (custom-remove-theme): Doc fixes.
This commit is contained in:
parent
ee1f522d4e
commit
e2cd29bdb4
4 changed files with 28 additions and 9 deletions
|
|
@ -107,9 +107,9 @@
|
|||
(purecopy (concat "^\\s-*("
|
||||
(eval-when-compile
|
||||
(regexp-opt
|
||||
'("defgroup" "deftype" "defstruct" "defclass"
|
||||
"define-condition" "define-widget" "defface"
|
||||
"defpackage") t))
|
||||
'("defgroup" "deftheme" "deftype" "defstruct"
|
||||
"defclass" "define-condition" "define-widget"
|
||||
"defface" "defpackage") t))
|
||||
"\\s-+'?\\(\\sw\\(\\sw\\|\\s_\\)+\\)"))
|
||||
2))
|
||||
|
||||
|
|
@ -121,6 +121,7 @@
|
|||
(put 'defun* 'doc-string-elt 3)
|
||||
(put 'defvar 'doc-string-elt 3)
|
||||
(put 'defcustom 'doc-string-elt 3)
|
||||
(put 'deftheme 'doc-string-elt 2)
|
||||
(put 'defconst 'doc-string-elt 3)
|
||||
(put 'defmacro 'doc-string-elt 3)
|
||||
(put 'defmacro* 'doc-string-elt 3)
|
||||
|
|
@ -132,9 +133,9 @@
|
|||
(put 'define-generic-mode 'doc-string-elt 7)
|
||||
;; define-global-mode has no explicit docstring.
|
||||
(put 'easy-mmode-define-global-mode 'doc-string-elt 0)
|
||||
(put 'define-ibuffer-filter 'doc-string-elt 3)
|
||||
(put 'define-ibuffer-filter 'doc-string-elt 2)
|
||||
(put 'define-ibuffer-op 'doc-string-elt 3)
|
||||
(put 'define-ibuffer-sorter 'doc-string-elt 3)
|
||||
(put 'define-ibuffer-sorter 'doc-string-elt 2)
|
||||
|
||||
(defun lisp-font-lock-syntactic-face-function (state)
|
||||
(if (nth 3 state)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue