diff options
author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-06-29 10:07:24 +0100 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-06-29 10:11:16 +0100 |
commit | 23d00d4cddc4526483248f8886ab26310a280ed3 (patch) | |
tree | 3c19870a72f9eba0de0f61e2a99363cd988ad1a9 /lisp/emacs-lisp | |
parent | 6689b537c84f27eb2dae70a2422f2da99b57aaab (diff) | |
download | emacs-23d00d4cddc4526483248f8886ab26310a280ed3.tar.gz emacs-23d00d4cddc4526483248f8886ab26310a280ed3.tar.bz2 emacs-23d00d4cddc4526483248f8886ab26310a280ed3.zip |
* lisp/emacs-lisp/tabulated-list.el (tabulated-list-print):
Don't block remember-pos if buffer isn't displayed. (Bug#20921)
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/tabulated-list.el | 6 |
1 files changed, 3 insertions, 3 deletions
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))) |