diff options
| author | Leo Liu <sdl.web@gmail.com> | 2016-01-07 11:00:52 +0800 |
|---|---|---|
| committer | Leo Liu <sdl.web@gmail.com> | 2016-01-07 11:00:52 +0800 |
| commit | ce4a052415b70030ee591af3cb5bed0fb79ef3aa (patch) | |
| tree | 83ef7cc2d1f097fd89704a8d5334beaa64b2e5ef /lisp/emacs-lisp/lisp-mode.el | |
| parent | a0121bc7112f3d6ab76a67ba84cd80301cdc3581 (diff) | |
| download | emacs-ce4a052415b70030ee591af3cb5bed0fb79ef3aa.tar.gz | |
Add defvar-local to lisp-imenu-generic-expression
* lisp/emacs-lisp/lisp-mode.el (lisp-imenu-generic-expression): Add
defvar-local.
Diffstat (limited to 'lisp/emacs-lisp/lisp-mode.el')
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 574ecef0cde..cb8abde52ed 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -131,9 +131,10 @@ t)) "\\s-+\\(" lisp-mode-symbol-regexp "\\)")) 2) - ;; For `defvar', we ignore (defvar FOO) constructs. + ;; For `defvar'/`defvar-local', we ignore (defvar FOO) constructs. (list (purecopy "Variables") - (purecopy (concat "^\\s-*(defvar\\s-+\\(" lisp-mode-symbol-regexp "\\)" + (purecopy (concat "^\\s-*(defvar\\(?:-local\\)?\\s-+\\(" + lisp-mode-symbol-regexp "\\)" "[[:space:]\n]+[^)]")) 1) (list (purecopy "Types") |