mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* saveplace.el (save-place-alist-to-file): Bind `print-length'

Browse source 
and `print-level' to nil when writing out `save-place-alist'.
  Thanks to Kai Grossjohann <kai@emptydomain.de> for enlightenment.
This commit is contained in:
Karl Fogel 2004-06-08 00:36:04 +00:00
parent 0aa99669e3
commit 5f29a6c8cc
2 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/saveplace.el
View file

@ -207,7 +207,9 @@ may have changed\) back to `save-place-alist'."
(delete-region (point-min) (point-max))
(when save-place-forget-unreadable-files
(save-place-forget-unreadable-files))
(print save-place-alist (current-buffer))
(let ((print-length nil)
(print-level nil))
(print save-place-alist (current-buffer)))
(let ((version-control
(cond
((null save-place-version-control) nil)