diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2005-03-29 14:18:00 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2005-03-29 14:18:00 +0000 |
| commit | ef91372af5abbff26bbdbea17ec28202f7dd2f65 (patch) | |
| tree | 11e110059e84f8888a88daa7910ade52d3998dad /lisp/progmodes/which-func.el | |
| parent | 8d194e3e9b34551d9651413586da945a8450c53b (diff) | |
| download | emacs-ef91372af5abbff26bbdbea17ec28202f7dd2f65.tar.gz | |
(which-function): Be robust in the face of an
imenu--make-index-alist failure.
Diffstat (limited to 'lisp/progmodes/which-func.el')
| -rw-r--r-- | lisp/progmodes/which-func.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/progmodes/which-func.el b/lisp/progmodes/which-func.el index dae5722d430..d329e234025 100644 --- a/lisp/progmodes/which-func.el +++ b/lisp/progmodes/which-func.el @@ -1,6 +1,7 @@ ;;; which-func.el --- print current function in mode line -;; Copyright (C) 1994, 1997, 1998, 2001, 2003 Free Software Foundation, Inc. +;; Copyright (C) 1994, 1997, 1998, 2001, 2003, 2005 +;; Free Software Foundation, Inc. ;; Author: Alex Rezinsky <alexr@msil.sps.mot.com> ;; (doesn't seem to be responsive any more) @@ -251,7 +252,7 @@ If no function name is found, return nil." (when (and (null name) (boundp 'imenu--index-alist) (null imenu--index-alist) (null which-function-imenu-failed)) - (imenu--make-index-alist) + (imenu--make-index-alist t) (unless imenu--index-alist (make-local-variable 'which-function-imenu-failed) (setq which-function-imenu-failed t))) @@ -291,5 +292,5 @@ If no function name is found, return nil." (provide 'which-func) -;;; arch-tag: fa8a55c7-bfe3-4ffc-95ab-01bf21796827 +;; arch-tag: fa8a55c7-bfe3-4ffc-95ab-01bf21796827 ;;; which-func.el ends here |