From: Artur Malabarba <bruce.connor.am@gmail.com>
Date: Fri, 31 Jul 2015 11:51:04 +0000 (+0100)
Subject: * lisp/emacs-lisp/tabulated-list.el (tabulated-list-print): Fix bug
X-Git-Tag: emacs-25.0.90~1406
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8d332aeccab2208e6c6bd434738565e6abf12043;p=emacs.git

* lisp/emacs-lisp/tabulated-list.el (tabulated-list-print): Fix bug

When updating the very last entry, tabulated-list-print would
erase it and then try to look at the next one (which obviously
isn't there).
---

diff --git a/lisp/emacs-lisp/tabulated-list.el b/lisp/emacs-lisp/tabulated-list.el
index 9119c3a5ade..cd61eb9ae56 100644
--- a/lisp/emacs-lisp/tabulated-list.el
+++ b/lisp/emacs-lisp/tabulated-list.el
@@ -356,10 +356,11 @@ changing `tabulated-list-sort-key'."
                           nil)
                          ;; If this entry sorts after id (or it's the
                          ;; end), then just insert id and move on.
-                         ((funcall sorter elt
-                                   ;; FIXME: Might be faster if
-                                   ;; don't construct this list.
-                                   (list local-id (tabulated-list-get-entry)))
+                         ((or (not local-id)
+                              (funcall sorter elt
+                                       ;; FIXME: Might be faster if
+                                       ;; don't construct this list.
+                                       (list local-id (tabulated-list-get-entry))))
                           (apply tabulated-list-printer elt)
                           nil)
                          ;; We find an entry that sorts before id,