diff options
| author | Richard M. Stallman | 1999-04-06 20:02:45 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1999-04-06 20:02:45 +0000 |
| commit | fdc5fa25cb979c88a87a2006c13a216faf9edffe (patch) | |
| tree | 16750b82c33b91b634b08062f694a69b43103eb3 /lisp | |
| parent | 58a58dc0237f9f67d125086a89b7dc9def58dea7 (diff) | |
| download | emacs-fdc5fa25cb979c88a87a2006c13a216faf9edffe.tar.gz emacs-fdc5fa25cb979c88a87a2006c13a216faf9edffe.zip | |
(imenu--mouse-menu): Use assq when searching in FINAL.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/imenu.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/imenu.el b/lisp/imenu.el index 4fa74b7ec72..f9028d34ef0 100644 --- a/lisp/imenu.el +++ b/lisp/imenu.el | |||
| @@ -918,7 +918,7 @@ Returns t for rescan and otherwise an element or subelement of INDEX-ALIST." | |||
| 918 | (stringp (nth (1- (length position)) position))) | 918 | (stringp (nth (1- (length position)) position))) |
| 919 | (let ((final menu)) | 919 | (let ((final menu)) |
| 920 | (while position | 920 | (while position |
| 921 | (setq final (assoc (car position) final)) | 921 | (setq final (assq (car position) final)) |
| 922 | (setq position (cdr position))) | 922 | (setq position (cdr position))) |
| 923 | (or (string= (car final) (car imenu--rescan-item)) | 923 | (or (string= (car final) (car imenu--rescan-item)) |
| 924 | (nthcdr 3 final)))) | 924 | (nthcdr 3 final)))) |