mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(whitespace-tickle-timer): Don't install the timer if

Browse Source 
whitespace-rescan-timer-time is 0.
This commit is contained in:
Michaël Cadilhac 2007-09-24 15:16:01 +00:00
parent 104b04f5ad
commit f0fe5c145d
2 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2007-09-24 Micha,Ak(Bl Cadilhac <michael@cadilhac.name>
* whitespace.el (whitespace-tickle-timer): Don't install the timer if
whitespace-rescan-timer-time is 0.
2007-09-24 Karl Berry <karl@gnu.org>
* international/mule.el (coding-system-base): Fix doc string grammar.

4
lisp/whitespace.el
View File

@ -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