(sort-build-lints): Add comment.

diff --git a/lisp/sort.el b/lisp/sort.el
index f6ce9a6..c3d135f 100644 (file)
--- a/lisp/sort.el
+++ b/lisp/sort.el
@@ -121,6 +121,8 @@ it defaults to `<', otherwise it defaults to `string<'."
 (defun sort-build-lists (nextrecfun endrecfun startkeyfun endkeyfun)
   (let ((sort-lists ())
        (start-rec nil)
+       ;; To avoid such functins as `end-of-line' being affected by
+       ;; fields.
        (inhibit-field-text-motion t)
        done key)
     ;; Loop over sort records.