(dired-mode-map): Add menu entry for async shell command.

diff --git a/lisp/dired.el b/lisp/dired.el
index b63ddb9..d42e2f5 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -1641,9 +1641,12 @@ Do so according to the former subdir alist OLD-SUBDIR-ALIST."
       '(menu-item "Symlink to..." dired-do-symlink
                  :visible (fboundp 'make-symbolic-link)
                  :help "Make symbolic links for current or marked files"))
+    (define-key map [menu-bar operate async-command]
+      '(menu-item "Asynchronous Shell Command..." dired-do-async-shell-command
+                 :help "Run a shell command asynchronously on current or marked files"))
     (define-key map [menu-bar operate command]
       '(menu-item "Shell Command..." dired-do-shell-command
-                 :help "Run a shell command on each of marked files"))
+                 :help "Run a shell command on current or marked files"))
     (define-key map [menu-bar operate delete]
       '(menu-item "Delete" dired-do-delete
                  :help "Delete current file or all marked files"))