diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-09-07 02:35:29 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-09-07 02:35:29 +0000 |
| commit | 8f09a02fc8ed6742265260fb686597f95bcb99c5 (patch) | |
| tree | 61215e0b861932bdbbf5131a67f897e97530d0a3 /lisp/proced.el | |
| parent | 448ecec3040e81e36c2c3953d3aa214fcc438f29 (diff) | |
| download | emacs-8f09a02fc8ed6742265260fb686597f95bcb99c5.tar.gz | |
(proced-mode-map): Bind "d" to proced-mark-alt.
(proced-mark-alt): New alias, to control the advertised key. (Bug#4362)
Diffstat (limited to 'lisp/proced.el')
| -rw-r--r-- | lisp/proced.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/proced.el b/lisp/proced.el index 1d11f71f216..ff571da4301 100644 --- a/lisp/proced.el +++ b/lisp/proced.el @@ -459,7 +459,7 @@ Important: the match ends just after the marker.") (define-key km [down] 'next-line) (define-key km [up] 'previous-line) ;; marking - (define-key km "d" 'proced-mark) ; Dired compatibility ("delete") + (define-key km "d" 'proced-mark-alt) ; Dired compatibility ("delete") (define-key km "m" 'proced-mark) (define-key km "u" 'proced-unmark) (define-key km "\177" 'proced-unmark-backward) @@ -716,6 +716,10 @@ The time interval for updates is specified via `proced-auto-update-interval'." (interactive "p") (proced-do-mark t count)) +;; So we can preferentially advertise the "m" binding in the mode help, +;; rather than the "d" one. +(defalias 'proced-mark-alt 'proced-mark) + (defun proced-unmark (&optional count) "Unmark the current (or next COUNT) processes." (interactive "p") |