diff options
author | Stefan Monnier <[email protected]> | 2010-09-18 00:28:10 +0200 |
---|---|---|
committer | Stefan Monnier <[email protected]> | 2010-09-18 00:28:10 +0200 |
commit | 269c197ee9d1c3c0b8c03c278d76a570740dd624 (patch) | |
tree | 05db433cbd7fc9550240074467c30ad47215e8e0 | |
parent | 4be520fbecbb9c5518838effc54518ddf919351d (diff) |
* lisp/obsolete/old-whitespace.el (whitespace-rescan-files-in-buffers):
Use with-current-buffer.
-rw-r--r-- | lisp/ChangeLog | 3 | ||||
-rw-r--r-- | lisp/obsolete/old-whitespace.el | 3 |
2 files changed, 4 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8edbfe8582..df2a231550 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2010-09-17 Stefan Monnier <[email protected]> + * obsolete/old-whitespace.el (whitespace-rescan-files-in-buffers): + Use with-current-buffer. + * isearch.el (isearch-face): Rename from `isearch'. (isearch-highlight): Use new name. diff --git a/lisp/obsolete/old-whitespace.el b/lisp/obsolete/old-whitespace.el index 0245537faa..71568f98d5 100644 --- a/lisp/obsolete/old-whitespace.el +++ b/lisp/obsolete/old-whitespace.el @@ -725,9 +725,8 @@ If timer is not set, then set it to scan the files in (setq bufname (cadr thiselt)) (setq buf (get-buffer bufname)) (if (buffer-live-p buf) - (save-excursion + (with-current-buffer bufname ;;(message "buffer %s live" bufname) - (set-buffer bufname) (if whitespace-mode (progn ;;(message "checking for whitespace in %s" bufname) |