From f0fe5c145df2bb03a13afb8ffbc93b482505aa74 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Micha=C3=ABl=20Cadilhac?= Date: Mon, 24 Sep 2007 15:16:01 +0000 Subject: [PATCH] (whitespace-tickle-timer): Don't install the timer if whitespace-rescan-timer-time is 0. --- lisp/ChangeLog | 5 +++++ lisp/whitespace.el | 4 +++- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e19201b313c..c2d80dc0644 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2007-09-24 Micha,Ak(Bl Cadilhac + + * whitespace.el (whitespace-tickle-timer): Don't install the timer if + whitespace-rescan-timer-time is 0. + 2007-09-24 Karl Berry * international/mule.el (coding-system-base): Fix doc string grammar. diff --git a/lisp/whitespace.el b/lisp/whitespace.el index 3ea8394b0b7..6e6aeb5fbb7 100644 --- a/lisp/whitespace.el +++ b/lisp/whitespace.el @@ -709,7 +709,9 @@ periodically for whitespace." If timer is not set, then set it to scan the files in `whitespace-all-buffer-files' periodically (defined by `whitespace-rescan-timer-time') for whitespace creep." - (if (and whitespace-rescan-timer-time (not whitespace-rescan-timer)) + (if (and whitespace-rescan-timer-time + (/= whitespace-rescan-timer-time 0) + (not whitespace-rescan-timer)) (setq whitespace-rescan-timer (add-timeout whitespace-rescan-timer-time 'whitespace-rescan-files-in-buffers nil -- 2.39.5