diff options
| author | Richard M. Stallman <rms@gnu.org> | 1996-03-05 04:22:25 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1996-03-05 04:22:25 +0000 |
| commit | ecb557b4ae8a661ea86be1794bb4511e9e4a7168 (patch) | |
| tree | d0450b6dea3891a4fd84c1c90265b4c404c107dd | |
| parent | 0038e936f83e9381b3684243bd081548b9b50768 (diff) | |
| download | emacs-ecb557b4ae8a661ea86be1794bb4511e9e4a7168.tar.gz | |
(save-place-kill-emacs-hook): Don't save
if we never loaded the save-place-file.
| -rw-r--r-- | lisp/saveplace.el | 6 |
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) |