diff options
| author | Glenn Morris | 2004-01-18 14:00:34 +0000 |
|---|---|---|
| committer | Glenn Morris | 2004-01-18 14:00:34 +0000 |
| commit | f2633782cdabe68ab1e02aabb0fb2697ae107ab3 (patch) | |
| tree | 089033a8405e94a524b7cd796814b75e1f0a80dc | |
| parent | 68a38c2303cf6f7fa821679a5030776b903ea1d2 (diff) | |
| download | emacs-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.el | 3 |
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))))) |