From 16178f4ae79812ca50e704a580db9fa3bc6d0ad0 Mon Sep 17 00:00:00 2001 From: David Aspinall Date: Thu, 1 Jul 2010 22:16:08 +0000 Subject: Replace uses of save-excursion with with-current-buffer. This prevents a spurious warning from Emacs 23 (and is a minor efficiency improvement). --- mmm/mmm-region.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/mmm/mmm-region.el b/mmm/mmm-region.el index 15b71886..c6c7a5af 100644 --- a/mmm/mmm-region.el +++ b/mmm/mmm-region.el @@ -505,8 +505,7 @@ is non-nil, don't quit if the info is already there." ;; On errors, the temporary buffers don't get deleted, so here ;; we get rid of any old ones that may be hanging around. (when (buffer-live-p (get-buffer mmm-temp-buffer-name)) - (save-excursion - (set-buffer (get-buffer mmm-temp-buffer-name)) + (with-current-buffer (get-buffer mmm-temp-buffer-name) (set-buffer-modified-p nil) (kill-buffer (current-buffer)))) ;; Now make a new temporary buffer. -- cgit v1.2.3