summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/tabulated-list.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/tabulated-list.el')
-rw-r--r--lisp/emacs-lisp/tabulated-list.el6
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)))