mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-24 19:03:29 +00:00
Code Issues Releases Activity

revert-buffer eliminates overlays and the mark

Browse Source
This commit is contained in:
Vinicius Jose Latorre 2007-12-11 00:26:52 +00:00
parent aa5fea59c1
commit bb14938c9f
2 changed files with 15 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,3 +1,7 @@
2007-12-10 Yoni Rabkin Katzenell <yoni-r@actcom.com> (tiny change)
* file.el (revert-buffer): Eliminate overlays and the mark.
2007-12-10 Stefan Monnier <monnier@iro.umontreal.ca>
* server.el (server-select-display): Fix important typo.

16
lisp/files.el
View File

@ -4204,10 +4204,12 @@ This undoes all changes since the file was visited or saved.
With a prefix argument, offer to revert from latest auto-save file, if
that is more recent than the visited file.
This command also works for special buffers that contain text which
doesn't come from a file, but reflects some other data base instead:
for example, Dired buffers and `buffer-list' buffers. In these cases,
it reconstructs the buffer contents from the appropriate data base.
This command also implements an interface for special buffers
that contain text which doesn't come from a file, but reflects
some other data instead (e.g. Dired buffers, `buffer-list'
buffers). This is done via the variable
`revert-buffer-function'. In these cases, it should reconstruct
the buffer contents from the appropriate data.
When called from Lisp, the first argument is IGNORE-AUTO; only offer
to revert from the auto-save file when this is nil. Note that the
@ -4323,7 +4325,11 @@ non-nil, it is called instead of rereading visited file contents."
(insert-file-contents file-name (not auto-save-p)
nil nil t))
(insert-file-contents file-name (not auto-save-p)
nil nil t)))))
nil nil t))
;; Reset the mark and remove all overlays.
(setq mark-active nil
mark-ring nil)
(remove-overlays))))
;; Recompute the truename in case changes in symlinks
;; have changed the truename.
(setq buffer-file-truename