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

[Juanma Barranquero]

Index: emacs/lisp/saveplace.el
diff -c emacs/lisp/saveplace.el:1.24 emacs/lisp/saveplace.el:1.25
*** emacs/lisp/saveplace.el:1.24        Wed Aug 14 20:40:43 2002
--- emacs/lisp/saveplace.el     Tue Feb  4 07:03:24 2003
***************
*** 172,178 ****
                  (delete-region (point-min) (point-max))
                  (insert-file-contents file)
                  (goto-char (point-min))
!                 (setq save-place-alist 
                        (car (read-from-string
                              (buffer-substring (point-min) (point-max)))))
  
--- 172,178 ----
                  (delete-region (point-min) (point-max))
                  (insert-file-contents file)
                  (goto-char (point-min))
!                 (setq save-place-alist
                        (car (read-from-string
                              (buffer-substring (point-min) (point-max)))))
  
***************
*** 192,198 ****
                                (setcdr s nil)
                              (setq count (1+ count)))
                            (setq s (cdr s))))))
!                   
                  (kill-buffer (current-buffer))
                  (message "Loading places from %s...done" file)))
            nil))))
--- 192,198 ----
                                (setcdr s nil)
                              (setq count (1+ count)))
                            (setq s (cdr s))))))
! 
                  (kill-buffer (current-buffer))
                  (message "Loading places from %s...done" file)))
            nil))))