[Emacs-diffs] /srv/bzr/emacs/trunk r105290: lisp/proced.el (proced-send-signal): small fix

[Roland Winkler]

------------------------------------------------------------
revno: 105290
committer: Roland Winkler <address@hidden>
branch nick: trunk
timestamp: Tue 2011-07-19 20:09:31 -0500
message:
  lisp/proced.el (proced-send-signal): small fix
modified:
  lisp/ChangeLog
  lisp/proced.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-07-19 21:31:26 +0000
+++ b/lisp/ChangeLog    2011-07-20 01:09:31 +0000
@@ -1,3 +1,7 @@
+2011-07-19  Roland Winkler  <address@hidden>
+       * proced.el (proced-send-signal): For *Marked Processes* buffer
+       put point at beginning of buffer.
+
 2011-07-19  Stephen Berman  <address@hidden>
 
        * proced.el (proced-format): Make header lines align with the text

=== modified file 'lisp/proced.el'
--- a/lisp/proced.el    2011-07-19 21:31:26 +0000
+++ b/lisp/proced.el    2011-07-20 01:09:31 +0000
@@ -1733,7 +1733,9 @@
             (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)