diff options
author | Karl Fogel <kfogel@red-bean.com> | 2001-04-19 22:55:19 +0000 |
---|---|---|
committer | Karl Fogel <kfogel@red-bean.com> | 2001-04-19 22:55:19 +0000 |
commit | 939d70190345618e4f5300429be1b799106b2b27 (patch) | |
tree | 1268bc60b7108d83e65151e8b6c7382629d6bf62 /lisp/saveplace.el | |
parent | 2a83a11dc18627b89feceffe344bb90722d588ba (diff) | |
download | emacs-939d70190345618e4f5300429be1b799106b2b27.tar.gz |
* saveplace.el (save-place-alist-to-file): Removed no-effect code
that inserted file content only to delete it immediately.
Probably a cut-and-paste bug. Thanks to Juanma Barranquero
<lektu@uol.com.br> for the patch.
Diffstat (limited to 'lisp/saveplace.el')
-rw-r--r-- | lisp/saveplace.el | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lisp/saveplace.el b/lisp/saveplace.el index 5ac3f344c62..f5f5111f17b 100644 --- a/lisp/saveplace.el +++ b/lisp/saveplace.el @@ -143,10 +143,6 @@ To save places automatically in all files, put this in your `.emacs' file: (message "Saving places to %s..." file) (set-buffer (get-buffer-create " *Saved Places*")) (delete-region (point-min) (point-max)) - (if (file-readable-p file) - (insert-file-contents file)) - (delete-region (point-min) (point-max)) - (goto-char (point-min)) (print save-place-alist (current-buffer)) (let ((version-control (cond |