(sort-build-lints): Add comment.

1 files changed, 2 insertions, 0 deletions

diff --git a/lisp/sort.el b/lisp/sort.el
index f6ce9a6c7b0..c3d135f4c66 100644
--- 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.