[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 23d00d4: * lisp/emacs-lisp/tabulated-list.el (tabul
From: |
Artur Malabarba |
Subject: |
[Emacs-diffs] master 23d00d4: * lisp/emacs-lisp/tabulated-list.el (tabulated-list-print): |
Date: |
Mon, 29 Jun 2015 09:11:52 +0000 |
branch: master
commit 23d00d4cddc4526483248f8886ab26310a280ed3
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>
* lisp/emacs-lisp/tabulated-list.el (tabulated-list-print):
Don't block remember-pos if buffer isn't displayed. (Bug#20921)
---
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 4bf714b..9119c3a 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)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 23d00d4: * lisp/emacs-lisp/tabulated-list.el (tabulated-list-print):,
Artur Malabarba <=