diff options
| author | Karl Fogel <kfogel@red-bean.com> | 2013-03-13 13:54:05 -0500 |
|---|---|---|
| committer | Karl Fogel <kfogel@red-bean.com> | 2013-03-13 13:54:05 -0500 |
| commit | 1c4a85eda018224ac258d8b55cad5093015f1f77 (patch) | |
| tree | dd49189251189c654205eca2681be072a62ed376 /lisp/saveplace.el | |
| parent | 47d7532e093db8a5068a40c587915121ffaaad18 (diff) | |
| download | emacs-1c4a85eda018224ac258d8b55cad5093015f1f77.tar.gz | |
* saveplace.el (save-place-alist-to-file): Don't sort
`save-place-alist', just pretty-print it (bug#13882).
Diffstat (limited to 'lisp/saveplace.el')
| -rw-r--r-- | lisp/saveplace.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/saveplace.el b/lisp/saveplace.el index ef2f5469e29..1b7efcec1b9 100644 --- a/lisp/saveplace.el +++ b/lisp/saveplace.el @@ -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) |