aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorArtur Malabarba2015-06-14 14:40:48 +0100
committerArtur Malabarba2015-06-14 14:40:48 +0100
commit57e7666477a9cd14ad4f1386856686a23bfb87fd (patch)
tree6b7b2481209586cf8ae373c67c74e30948f7cc17
parent79bd666940b52252123ae52016b06f4e9456db41 (diff)
downloademacs-57e7666477a9cd14ad4f1386856686a23bfb87fd.tar.gz
emacs-57e7666477a9cd14ad4f1386856686a23bfb87fd.zip
* lisp/emacs-lisp/tabulated-list.el (tabulated-list-print):
Don't assume that `tabulated-list-printer' will leave point at the end of the buffer. (Bug#20810)
-rw-r--r--lisp/emacs-lisp/tabulated-list.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/tabulated-list.el b/lisp/emacs-lisp/tabulated-list.el
index fb3045d2b4c..4bf714baa18 100644
--- a/lisp/emacs-lisp/tabulated-list.el
+++ b/lisp/emacs-lisp/tabulated-list.el
@@ -347,7 +347,7 @@ changing `tabulated-list-sort-key'."
347 (setq entry-id nil 347 (setq entry-id nil
348 saved-pt (point))) 348 saved-pt (point)))
349 ;; If the buffer this empty, simply print each elt. 349 ;; If the buffer this empty, simply print each elt.
350 (if (eobp) 350 (if (or (not update) (eobp))
351 (apply tabulated-list-printer elt) 351 (apply tabulated-list-printer elt)
352 (while (let ((local-id (tabulated-list-get-id))) 352 (while (let ((local-id (tabulated-list-get-id)))
353 ;; If we find id, then nothing to update. 353 ;; If we find id, then nothing to update.