(dired-mode-map): Add :help.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e6e6db5a8338b76a129a642238822083061ed6f7..1499f15a921304b7f6ca74f3caba212e040a9112 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2008-04-30  Dan Nicolaescu  <dann@ics.uci.edu>
 
+       * dired.el (dired-mode-map): Add :help.
+
        * vc.el (vc-deduce-fileset): Add new parameter.
        (vc-dir-marked-only-files): New function.
        (vc-next-action): Don't ignore directories, look at the files

diff --git a/lisp/dired.el b/lisp/dired.el
index 845f2cb24bcf83d0056204daaa283f9c83fa50e7..b301bda7e6b4a3a892ee77c2bac044dfbcb56624 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -1417,9 +1417,11 @@ Do so according to the former subdir alist OLD-SUBDIR-ALIST."
       '(menu-item "Find This File" dired-find-file
                  :help "Edit file at cursor"))
     (define-key map [menu-bar immediate create-directory]
-      '(menu-item "Create Directory..." dired-create-directory))
+      '(menu-item "Create Directory..." dired-create-directory
+                 :help "Create a directory"))
     (define-key map [menu-bar immediate wdired-mode]
       '(menu-item "Edit File Names" wdired-change-to-wdired-mode
+                 :help "Put a dired buffer in a mode in which filenames are editable"
                  :filter (lambda (x) (if (eq major-mode 'dired-mode) x))))
 
     (define-key map [menu-bar regexp]