Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
5044b74a
Commit
5044b74a
authored
Jul 25, 2000
by
Sam Steingold
Browse files
midnight-buffer-display-time: use with-current-buffer
parent
5dcfb3f4
Changes
2
Show whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
11 additions
and
7 deletions
+11
-7
lisp/ChangeLog
lisp/ChangeLog
+10
-5
lisp/midnight.el
lisp/midnight.el
+1
-2
No files found.
lisp/ChangeLog
View file @
5044b74a
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.
...
...
lisp/midnight.el
View file @
5044b74a
...
...
@@ -76,8 +76,7 @@ call `cancel-timer' or `timer-activate' on `midnight-timer' instead."
(
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
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment