diff options
author | Roland Winkler <[email protected]> | 2008-08-18 01:01:59 +0000 |
---|---|---|
committer | Roland Winkler <[email protected]> | 2008-08-18 01:01:59 +0000 |
commit | 91181f91a69cde61aed9acd84febe4871eb8b4bd (patch) | |
tree | fb345670540387f1fb29c345a0321e3f7d256065 | |
parent | 9f583d141ffe6198a69c57491fb4f1349f020b22 (diff) |
proced.el (proced-send-signal): Use beginning-of-line.
-rw-r--r-- | lisp/ChangeLog | 4 | ||||
-rw-r--r-- | lisp/proced.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 08cafe3853..e389762232 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,9 @@ 2008-08-17 Roland Winkler <[email protected]> + * proced.el (proced-send-signal): Use beginning-of-line. + +2008-08-17 Roland Winkler <[email protected]> + * 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 0df3b9a979..afc11e4c88 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) |