[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[PATCH 1/2] bibtex.el: Fix imenu support.
From: |
Rüdiger Sonderfeld |
Subject: |
[PATCH 1/2] bibtex.el: Fix imenu support. |
Date: |
Wed, 12 Jun 2013 00:41:04 +0200 |
User-agent: |
KMail/4.10.3 (Linux/3.8.0-23-generic; KDE/4.10.3; x86_64; ; ) |
The bug was introduced in revision 104969.
* lisp/textmodes/bibtex.el (bibtex-mode, bibtex-set-dialect): Update
imenu-support when dialect changes.
Signed-off-by: Rüdiger Sonderfeld <address@hidden>
---
lisp/textmodes/bibtex.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/lisp/textmodes/bibtex.el b/lisp/textmodes/bibtex.el
index 01a126e..6280e19 100644
--- a/lisp/textmodes/bibtex.el
+++ b/lisp/textmodes/bibtex.el
@@ -3400,9 +3400,6 @@ (define-derived-mode bibtex-mode nil "BibTeX"
(set (make-local-variable 'syntax-propertize-function)
(syntax-propertize-via-font-lock
bibtex-font-lock-syntactic-keywords))
- (setq imenu-generic-expression
- (list (list nil bibtex-entry-head bibtex-key-in-head))
- imenu-case-fold-search t)
;; Allow `bibtex-dialect' as a file-local variable.
(add-hook 'hack-local-variables-hook 'bibtex-set-dialect nil t))
@@ -3479,7 +3476,10 @@ (defun bibtex-set-dialect (&optional dialect local)
(concat "^[ address@hidden \t]*\\(?:"
(regexp-opt
(append '("String" "Preamble")
- (mapcar 'car bibtex-entry-alist))) "\\)"))))
+ (mapcar 'car bibtex-entry-alist))) "\\)"))
+ (setq imenu-generic-expression
+ (list (list nil bibtex-entry-head bibtex-key-in-head))
+ imenu-case-fold-search t)))
;; Entry commands and menus for BibTeX dialects
;; We do not use `easy-menu-define' here because this gets confused
--
1.8.3
- [PATCH 1/2] bibtex.el: Fix imenu support.,
Rüdiger Sonderfeld <=