* lisp/emacs-lisp/tabulated-list.el: Don't sort without sorter

(tabulated-list-print): Don't sort if sorter is nil

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/emacs-lisp/tabulated-list.el b/lisp/emacs-lisp/tabulated-list.el
index 58b8fd62d2f..fb3045d2b4c 100644
--- a/lisp/emacs-lisp/tabulated-list.el
+++ b/lisp/emacs-lisp/tabulated-list.el
@@ -327,7 +327,8 @@ changing `tabulated-list-sort-key'."
          (setq entry-id (tabulated-list-get-id))
          (setq saved-col (current-column)))
     ;; Sort the entries, if necessary.
-    (setq entries (sort entries sorter))
+    (when sorter
+      (setq entries (sort entries sorter)))
     (unless (functionp tabulated-list-entries)
       (setq tabulated-list-entries entries))
     ;; Without a sorter, we have no way to just update.