[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Proced revert (Re: Dired auto-revert)
From: |
Juri Linkov |
Subject: |
Proced revert (Re: Dired auto-revert) |
Date: |
Fri, 04 Dec 2009 02:11:19 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.1.50 (x86_64-pc-linux-gnu) |
After typing `M-x proced RET' I see a list of inexistent processes that
were terminated long ago. That's because `M-x proced RET' brings up
to display the old *Proced* buffer with obsolete process information.
I think when someone sometimes wants to get the old *Proced* buffer, the
right command to do this is `C-x b *Proced* RET'. But `M-x proced RET'
should always display up-to-date process information.
BTW, there is also a related problem. Typing `q' exits from Proced
and hides the *Proced* buffer, but switches to *Marked Processes*
where typing `q' has no effect.
In Dired, the *Marked Files* buffer is always hidden because it has
a space character at the beginning of its name " *Marked Files*".
This patch also adds a space to the *Marked Processes* buffer name.
Index: lisp/proced.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/proced.el,v
retrieving revision 1.42
diff -u -r1.42 proced.el
--- lisp/proced.el 12 Oct 2009 04:59:07 -0000 1.42
+++ lisp/proced.el 4 Dec 2009 00:11:12 -0000
@@ -682,9 +682,9 @@
(progn
(display-buffer buffer)
(with-current-buffer buffer
- (run-hooks 'proced-post-display-hook)))
+ (proced-update t)))
(pop-to-buffer buffer)
- (run-hooks 'proced-post-display-hook)
+ (proced-update t)
(message
(substitute-command-keys
"Type \\<proced-mode-map>\\[quit-window] to quit, \\[proced-help] for
help")))))
@@ -1711,7 +1711,7 @@
(line-end-position))))))
(unless signal
;; Display marked processes (code taken from `dired-mark-pop-up').
- (let ((bufname "*Marked Processes*")
+ (let ((bufname " *Marked Processes*")
(header-line (substring-no-properties proced-header-line)))
(with-current-buffer (get-buffer-create bufname)
(setq truncate-lines t
--
Juri Linkov
http://www.jurta.org/emacs/
- Proced revert (Re: Dired auto-revert),
Juri Linkov <=