Mercurial > emacs
changeset 69502:709ebd36d96d
(sort-build-lists): Temporarily bind
inhibit-field-text-motion to t.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Thu, 16 Mar 2006 02:10:56 +0000 |
| parents | c22f46390a8f |
| children | 0937e89a24cd |
| files | lisp/sort.el |
| diffstat | 1 files changed, 1 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/sort.el Thu Mar 16 01:43:59 2006 +0000 +++ b/lisp/sort.el Thu Mar 16 02:10:56 2006 +0000 @@ -121,6 +121,7 @@ (defun sort-build-lists (nextrecfun endrecfun startkeyfun endkeyfun) (let ((sort-lists ()) (start-rec nil) + (inhibit-field-text-motion t) done key) ;; Loop over sort records. ;(goto-char (point-min)) -- it is the caller's responsibility to