summaryrefslogtreecommitdiff
path: root/lisp/saveplace.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-09-06 02:16:33 +0000
committerRichard M. Stallman <rms@gnu.org>1994-09-06 02:16:33 +0000
commit47c5a4719aa22391195863fdc4fe7e59968c0a03 (patch)
tree09f9d79259a58ad7d499ec10c9db79100ef0be93 /lisp/saveplace.el
parent58c4d0cbbf1bcddd3e56a309c75e838081d278b5 (diff)
downloademacs-47c5a4719aa22391195863fdc4fe7e59968c0a03.tar.gz
(save-place-find-file-hook): Check after-find-file-from-revert-buffer.
Diffstat (limited to 'lisp/saveplace.el')
-rw-r--r--lisp/saveplace.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/saveplace.el b/lisp/saveplace.el
index c2927526eaf..e7b28e74768 100644
--- a/lisp/saveplace.el
+++ b/lisp/saveplace.el
@@ -178,7 +178,8 @@ To save places automatically in all files, put this in your `.emacs' file:
(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)))))