summaryrefslogtreecommitdiff
path: root/lisp/saveplace.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/saveplace.el')
-rw-r--r--lisp/saveplace.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/saveplace.el b/lisp/saveplace.el
index f86c48a6f7c..a33ccbcd7f5 100644
--- a/lisp/saveplace.el
+++ b/lisp/saveplace.el
@@ -211,8 +211,10 @@ To save places automatically in all files, put this in your `.emacs' file:
(setq save-place t)))))
(defun save-place-kill-emacs-hook ()
- (save-places-to-alist)
- (save-place-alist-to-file))
+ (if save-place-loaded
+ (progn
+ (save-places-to-alist)
+ (save-place-alist-to-file))))
(add-hook 'find-file-hooks 'save-place-find-file-hook t)