# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1074434434 0
# Node ID bd715b02e44e64618ee4c8ede2861d6f66e8835b
# Parent  6b7597ec2d660d534fd0a1f1ba4357015bdc60bc
David Ponce  <david@dponce.com>
(which-function-mode): Don't cancel which-func-update-timer if not set.

diff -r 6b7597ec2d66 -r bd715b02e44e lisp/progmodes/which-func.el
--- a/lisp/progmodes/which-func.el	Sun Jan 18 03:15:25 2004 +0000
+++ b/lisp/progmodes/which-func.el	Sun Jan 18 14:00:34 2004 +0000
@@ -198,7 +198,8 @@
                   (or (eq which-func-modes t)
                       (member major-mode which-func-modes))))))
     ;; Turn it off
-    (cancel-timer which-func-update-timer)
+    (when (timerp which-func-update-timer)
+      (cancel-timer which-func-update-timer))
     (setq which-func-update-timer nil)
     (dolist (buf (buffer-list))
       (with-current-buffer buf (setq which-func-mode nil)))))