diff lisp/midnight.el @ 30458:241c83e5f559

midnight-buffer-display-time: use with-current-buffer
author Sam Steingold <sds@gnu.org>
date Tue, 25 Jul 2000 21:38:34 +0000
parents 32fd8c1e4e51
children b603c68fff56
line wrap: on
line diff
--- a/lisp/midnight.el	Tue Jul 25 16:07:46 2000 +0000
+++ b/lisp/midnight.el	Tue Jul 25 21:38:34 2000 +0000
@@ -76,8 +76,7 @@
 
 (defun midnight-buffer-display-time (&optional buf)
   "Return the time-stamp of the given buffer, or current buffer, as float."
-  (save-excursion
-    (set-buffer (or buf (current-buffer)))
+  (with-current-buffer (or buf (current-buffer))
     (when buffer-display-time (midnight-float-time buffer-display-time))))
 
 ;;; clean-buffer-list stuff