changeset 14753:cf8ad47dc610

(save-place-kill-emacs-hook): Don't save if we never loaded the save-place-file.
author Richard M. Stallman <rms@gnu.org>
date Tue, 05 Mar 1996 04:22:25 +0000
parents 38436b7a34ce
children 9955249f9b0f
files lisp/saveplace.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/saveplace.el	Tue Mar 05 03:02:45 1996 +0000
+++ b/lisp/saveplace.el	Tue Mar 05 04:22:25 1996 +0000
@@ -211,8 +211,10 @@
           (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)