[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 1c382c0: Make list-processes support display-line-n
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] master 1c382c0: Make list-processes support display-line-numbers |
Date: |
Sat, 19 Aug 2017 09:38:14 -0400 (EDT) |
branch: master
commit 1c382c096b8b7d1fa995e6131b887d9128085c68
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>
Make list-processes support display-line-numbers
* lisp/simple.el (process-menu-mode): Move the call to
tabulated-list-init-header from here...
(list-processes--refresh): ...to here. (Bug#27895)
---
lisp/simple.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/simple.el b/lisp/simple.el
index 58f8372..072723c 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3928,8 +3928,7 @@ support pty association, if PROGRAM is nil."
("Command" 0 t)])
(make-local-variable 'process-menu-query-only)
(setq tabulated-list-sort-key (cons "Process" nil))
- (add-hook 'tabulated-list-revert-hook 'list-processes--refresh nil t)
- (tabulated-list-init-header))
+ (add-hook 'tabulated-list-revert-hook 'list-processes--refresh nil t))
(defun process-menu-delete-process ()
"Kill process at point in a `list-processes' buffer."
@@ -3990,7 +3989,8 @@ Also, delete any process that is exited or signaled."
"")))))
(mapconcat 'identity (process-command p) " "))))
(push (list p (vector name pid status buf-label tty cmd))
- tabulated-list-entries))))))
+ tabulated-list-entries)))))
+ (tabulated-list-init-header))
(defun process-menu-visit-buffer (button)
(display-buffer (button-get button 'process-buffer)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 1c382c0: Make list-processes support display-line-numbers,
Eli Zaretskii <=