aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier <[email protected]>2010-09-18 00:28:10 +0200
committerStefan Monnier <[email protected]>2010-09-18 00:28:10 +0200
commit269c197ee9d1c3c0b8c03c278d76a570740dd624 (patch)
tree05db433cbd7fc9550240074467c30ad47215e8e0
parent4be520fbecbb9c5518838effc54518ddf919351d (diff)
* lisp/obsolete/old-whitespace.el (whitespace-rescan-files-in-buffers):
Use with-current-buffer.
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/obsolete/old-whitespace.el3
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)