Mercurial > emacs

diff lisp/sort.el @ 69502:709ebd36d96d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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 68ba98572eb9
children afd67a8ec176
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