* saveplace.el (save-place-alist-to-file): Don't sort

`save-place-alist', just pretty-print it (bug#13882).
This commit is contained in:
Karl Fogel 2013-03-13 13:54:05 -05:00
parent 47d7532e09
commit 1c4a85eda0
2 changed files with 6 additions and 3 deletions

View file

@ -1,3 +1,8 @@
2013-03-13 Karl Fogel <kfogel@red-bean.com>
* saveplace.el (save-place-alist-to-file): Don't sort
`save-place-alist', just pretty-print it (bug#13882).
2013-03-13 Michael Albinus <michael.albinus@gmx.de>
* net/tramp-sh.el (tramp-sh-handle-insert-directory): Check,

View file

@ -224,9 +224,7 @@ may have changed\) back to `save-place-alist'."
(symbol-name coding-system-for-write)))
(let ((print-length nil)
(print-level nil))
(pp (sort save-place-alist
(lambda (a b) (string< (car a) (car b))))
(current-buffer)))
(pp save-place-alist (current-buffer)))
(let ((version-control
(cond
((null save-place-version-control) nil)