[Emacs-diffs] Changes to emacs/lisp/saveplace.el

[Richard M . Stallman]

Index: emacs/lisp/saveplace.el
diff -c emacs/lisp/saveplace.el:1.31 emacs/lisp/saveplace.el:1.32
*** emacs/lisp/saveplace.el:1.31        Sat Apr 23 16:40:24 2005
--- emacs/lisp/saveplace.el     Sun May 29 08:36:26 2005
***************
*** 222,228 ****
                (t
                 t))))
        (condition-case nil
!           (write-file file)
          (file-error (message "Can't write %s" file)))
          (kill-buffer (current-buffer))
          (message "Saving places to %s...done" file)))))
--- 222,229 ----
                (t
                 t))))
        (condition-case nil
!           ;; Don't use write-file; we don't want this buffer to visit it.
!           (write-region (point-min) (point-max) file)
          (file-error (message "Can't write %s" file)))
          (kill-buffer (current-buffer))
          (message "Saving places to %s...done" file)))))