From 5db2afd2fbcece1d054a13b08d32f9cee19d704a Mon Sep 17 00:00:00 2001 From: Roland Winkler Date: Tue, 19 Jul 2011 20:09:31 -0500 Subject: lisp/proced.el (proced-send-signal): small fix --- lisp/ChangeLog | 4 ++++ lisp/proced.el | 4 +++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 069dbb2922..bd27ae8da2 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2011-07-19 Roland Winkler + * proced.el (proced-send-signal): For *Marked Processes* buffer + put point at beginning of buffer. + 2011-07-19 Stephen Berman * proced.el (proced-format): Make header lines align with the text diff --git a/lisp/proced.el b/lisp/proced.el index cc1856060b..b1a7aed722 100644 --- a/lisp/proced.el +++ b/lisp/proced.el @@ -1733,7 +1733,9 @@ After sending the signal, this command runs the normal hook (buffer-disable-undo) (setq buffer-read-only t) (dolist (process process-alist) - (insert " " (cdr process) "\n"))) + (insert " " (cdr process) "\n")) + (delete-char -1) + (goto-char (point-min))) (save-window-excursion ;; Analogous to `dired-pop-to-buffer' ;; Don't split window horizontally. (Bug#1806) -- cgit v1.2.3