procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* 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
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2004-06-07 Karl Fogel <kfogel@red-bean.com>
* saveplace.el (save-place-alist-to-file): Bind `print-length'
and `print-level' to nil when writing out `save-place-alist'.
Thanks to Kai Grossjohann <kai@emptydomain.de> for enlightenment.
2004-06-07 Juanma Barranquero <lektu@terra.es>
* completion.el (completion-kill-region): Doc fix.

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)