From: Artur Malabarba Date: Mon, 29 Jun 2015 09:07:24 +0000 (+0100) Subject: * lisp/emacs-lisp/tabulated-list.el (tabulated-list-print): X-Git-Tag: emacs-25.0.90~1614 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=23d00d4cddc4526483248f8886ab26310a280ed3;p=emacs.git * lisp/emacs-lisp/tabulated-list.el (tabulated-list-print): Don't block remember-pos if buffer isn't displayed. (Bug#20921) --- diff --git a/lisp/emacs-lisp/tabulated-list.el b/lisp/emacs-lisp/tabulated-list.el index 4bf714baa18..9119c3a5ade 100644 --- a/lisp/emacs-lisp/tabulated-list.el +++ b/lisp/emacs-lisp/tabulated-list.el @@ -321,11 +321,11 @@ changing `tabulated-list-sort-key'." (sorter (tabulated-list--get-sorter)) entry-id saved-pt saved-col window-line) (and remember-pos + (setq entry-id (tabulated-list-get-id)) + (setq saved-col (current-column)) (when (eq (window-buffer) (current-buffer)) (setq window-line - (count-screen-lines (window-start) (point)))) - (setq entry-id (tabulated-list-get-id)) - (setq saved-col (current-column))) + (count-screen-lines (window-start) (point))))) ;; Sort the entries, if necessary. (when sorter (setq entries (sort entries sorter)))