Mercurial > emacs

changeset 8711:5554c5e451ae

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(save-place-find-file-hook): Check after-find-file-from-revert-buffer.
author Richard M. Stallman <rms@gnu.org>
date Tue, 06 Sep 1994 02:16:33 +0000
parents 80ea1fd539f3
children 9bc99cd7a6ee
files lisp/saveplace.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/saveplace.el	Tue Sep 06 01:34:31 1994 +0000
+++ b/lisp/saveplace.el	Tue Sep 06 02:16:33 1994 +0000
@@ -178,7 +178,8 @@
   (let ((cell (assoc buffer-file-name save-place-alist)))
     (if cell
         (progn
-          (goto-char (cdr cell))
+	  (or after-find-file-from-revert-buffer
+	      (goto-char (cdr cell)))
           ;; and make sure it will be saved again for later
           (setq save-place t)))))