(proced-mode-map): Prefer "m" for proced-mark.

2 files changed, 5 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c44ca6f8efa..64b3612c7f4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2009-09-11  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+        * proced.el (proced-mode-map): Prefer "m" for proced-mark.
+
 2009-09-11  Nick Roberts  <nickrob@snap.net.nz>
 
         * progmodes/gdb-mi.el (gdb-var-update-regexp): Delete.
diff --git a/lisp/proced.el b/lisp/proced.el
index ff571da4301..39ce00326a7 100644
--- a/lisp/proced.el
+++ b/lisp/proced.el
@@ -461,6 +461,7 @@ Important: the match ends just after the marker.")
     ;; marking
     (define-key km "d" 'proced-mark-alt) ; Dired compatibility ("delete")
     (define-key km "m" 'proced-mark)
+    (put 'proced-mark :advertised-binding "m")
     (define-key km "u" 'proced-unmark)
     (define-key km "\177" 'proced-unmark-backward)
     (define-key km "M" 'proced-mark-all)