# HG changeset patch
# User Sam Steingold <sds@gnu.org>
# Date 964561114 0
# Node ID 241c83e5f559d03e05a497c7d214efc9fc6110f1
# Parent  07c7a241f4183bf20623e616ba26c0687b96862b
midnight-buffer-display-time: use with-current-buffer

diff -r 07c7a241f418 -r 241c83e5f559 lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Jul 25 16:07:46 2000 +0000
+++ b/lisp/ChangeLog	Tue Jul 25 21:38:34 2000 +0000
@@ -1,3 +1,8 @@
+2000-07-25  Sam Steingold  <sds@gnu.org>
+
+	* midnight.el (midnight-buffer-display-time): Use
+	`with-current-buffer'.
+
 2000-07-25  Gerd Moellmann  <gerd@gnu.org>
 
 	* find-dired.el: Update copyright notice.
@@ -113,7 +118,7 @@
 
 2000-07-24  Martin Stjernholm  <bug-cc-mode@gnu.org>
 
-	* cc-mode.texi Documented the change of cpp-macro. 
+	* cc-mode.texi Documented the change of cpp-macro.
 
 2000-07-24  Martin Stjernholm  <bug-cc-mode@gnu.org>
 
@@ -125,7 +130,7 @@
 	c-guess-basic-syntax): Fixed recognition of inheritance lists
 	when the lines begins with a comma.
 
-	* cc-mode.texi: Updated doc for c-lineup-multi-inher. 
+	* cc-mode.texi: Updated doc for c-lineup-multi-inher.
 
 	* cc-vars.el (c-offsets-alist): Changed default for
 	member-init-cont to c-lineup-multi-inher since it now handles
@@ -274,7 +279,7 @@
 	c-special-indent-hook as a style variable.  Don't talk about
 	doing (c-make-styles-buffer-local t) in a mode hook, since
 	that's already too late to work right.
-	
+
 	* cc-styles.el (c-make-styles-buffer-local): Flag style
 	variable localness in c-style-variables-are-local-p to make
 	the compatibility measure in c-common-init work well.
@@ -476,13 +481,13 @@
 	(ada-prj-load-from-file): New function
 	(ada-prj-save): Always save fields that depend on the current buffer
 	(ada-prj-show-value): New function
-	
+
 	* ada-stmt.el (ada-stmt-add-to-ada-menu): Hide the menu if not in
 	Ada mode. This will allow us to display the Ada menu in any buffer
 	we want (for project items).
 	(ada-header-tmpl): Use ada-fill-comment-prefix to put the correct
 	number of spaces in the header.
-	
+
 2000-07-24  Dave Love  <fx@gnu.org>
 
 	* ediff-init.el (ediff-region-help-echo): Bind face-help.
diff -r 07c7a241f418 -r 241c83e5f559 lisp/midnight.el
--- 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