[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r101467: * lisp/obsolete/old-whitespa
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r101467: * lisp/obsolete/old-whitespace.el (whitespace-rescan-files-in-buffers): |
Date: |
Sat, 18 Sep 2010 00:28:10 +0200 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 101467
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Sat 2010-09-18 00:28:10 +0200
message:
* lisp/obsolete/old-whitespace.el (whitespace-rescan-files-in-buffers):
Use with-current-buffer.
modified:
lisp/ChangeLog
lisp/obsolete/old-whitespace.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2010-09-17 22:09:58 +0000
+++ b/lisp/ChangeLog 2010-09-17 22:28:10 +0000
@@ -1,5 +1,8 @@
2010-09-17 Stefan Monnier <address@hidden>
+ * 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.
=== modified file 'lisp/obsolete/old-whitespace.el'
--- a/lisp/obsolete/old-whitespace.el 2010-09-14 14:59:42 +0000
+++ b/lisp/obsolete/old-whitespace.el 2010-09-17 22:28:10 +0000
@@ -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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r101467: * lisp/obsolete/old-whitespace.el (whitespace-rescan-files-in-buffers):,
Stefan Monnier <=