Mercurial > emacs

diff lisp/obsolete/old-whitespace.el @ 110402:c848ff4a679b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* lisp/obsolete/old-whitespace.el (whitespace-rescan-files-in-buffers): Use with-current-buffer.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sat, 18 Sep 2010 00:28:10 +0200
parents 79de2afad0d9
children 417b1e4d63cd
line wrap: on
line diff
--- a/lisp/obsolete/old-whitespace.el	Sat Sep 18 00:09:58 2010 +0200
+++ b/lisp/obsolete/old-whitespace.el	Sat Sep 18 00:28:10 2010 +0200
@@ -725,9 +725,8 @@
 	(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)