Mercurial > emacs
changeset 14768:ba3525471dae
(save-place-kill-emacs-hook): Always call save-places-to-alist.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 06 Mar 1996 06:28:39 +0000 |
parents | 95dca7f7b4b3 |
children | acf049402d18 |
files | lisp/saveplace.el |
diffstat | 1 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/saveplace.el Wed Mar 06 06:22:06 1996 +0000 +++ b/lisp/saveplace.el Wed Mar 06 06:28:39 1996 +0000 @@ -211,10 +211,12 @@ (setq save-place t))))) (defun save-place-kill-emacs-hook () + ;; First update the alist. This loads the old save-place-file if nec. + (save-places-to-alist) + ;; Now save the alist in the file, if we have ever loaded the file + ;; (including just now). (if save-place-loaded - (progn - (save-places-to-alist) - (save-place-alist-to-file)))) + (save-place-alist-to-file))) (add-hook 'find-file-hooks 'save-place-find-file-hook t)