proced.el (proced-send-signal): Use beginning-of-line.

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 08cafe3853f..e389762232b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
 2008-08-17  Roland Winkler  <Roland.Winkler@physik.uni-erlangen.de>
 
+        * proced.el (proced-send-signal): Use beginning-of-line.
+
+2008-08-17  Roland Winkler  <Roland.Winkler@physik.uni-erlangen.de>
+
         * proced.el (proced-signal-list): Add POSIX 1003.1-2001 signals.
         (proced-mode-map): Add tooltips for menus.  Use radio buttons for
         listing types.
diff --git a/lisp/proced.el b/lisp/proced.el
index 0df3b9a9792..afc11e4c88b 100644
--- a/lisp/proced.el
+++ b/lisp/proced.el
@@ -655,7 +655,7 @@ If SIGNAL is nil display marked processes and query interactively for SIGNAL."
               (nreverse process-list)
             ;; take current process
             (save-excursion
-              (line-beginning-position)
+              (beginning-of-line)
               (looking-at (concat "^" (proced-skip-regexp)
                                   "\\s-+\\([0-9]+\\>\\).*$"))
               (list (cons (match-string-no-properties 1)