* 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.

diff --git a/lisp/saveplace.el b/lisp/saveplace.el
index 5ac3f344c62ddf64e9de550de50945b518b03ad3..f5f5111f17b9d2362cdc7ea9b8edbd9e293e56a0 100644 (file)
--- 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