aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2004-01-18 14:00:34 +0000
committerGlenn Morris2004-01-18 14:00:34 +0000
commitf2633782cdabe68ab1e02aabb0fb2697ae107ab3 (patch)
tree089033a8405e94a524b7cd796814b75e1f0a80dc
parent68a38c2303cf6f7fa821679a5030776b903ea1d2 (diff)
downloademacs-f2633782cdabe68ab1e02aabb0fb2697ae107ab3.tar.gz
emacs-f2633782cdabe68ab1e02aabb0fb2697ae107ab3.zip
David Ponce <david@dponce.com>
(which-function-mode): Don't cancel which-func-update-timer if not set.
-rw-r--r--lisp/progmodes/which-func.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/which-func.el b/lisp/progmodes/which-func.el
index 4ffcddf48bf..fef159d850f 100644
--- a/lisp/progmodes/which-func.el
+++ b/lisp/progmodes/which-func.el
@@ -198,7 +198,8 @@ and off otherwise."
198 (or (eq which-func-modes t) 198 (or (eq which-func-modes t)
199 (member major-mode which-func-modes)))))) 199 (member major-mode which-func-modes))))))
200 ;; Turn it off 200 ;; Turn it off
201 (cancel-timer which-func-update-timer) 201 (when (timerp which-func-update-timer)
202 (cancel-timer which-func-update-timer))
202 (setq which-func-update-timer nil) 203 (setq which-func-update-timer nil)
203 (dolist (buf (buffer-list)) 204 (dolist (buf (buffer-list))
204 (with-current-buffer buf (setq which-func-mode nil))))) 205 (with-current-buffer buf (setq which-func-mode nil)))))