Mercurial > emacs

comparison lisp/dired.el @ 94489:746622b8b8d4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(dired-mode-map): Add :help.
author Dan Nicolaescu <dann@ics.uci.edu>
date Wed, 30 Apr 2008 05:41:52 +0000
parents a01f79200343
children 687d0af3b0f3
comparison
equal deleted inserted replaced
94488:d3100c0eddb7 94489:746622b8b8d4
1415 :help "Edit file at cursor in other window")) 1415 :help "Edit file at cursor in other window"))
1416 (define-key map [menu-bar immediate find-file] 1416 (define-key map [menu-bar immediate find-file]
1417 '(menu-item "Find This File" dired-find-file 1417 '(menu-item "Find This File" dired-find-file
1418 :help "Edit file at cursor")) 1418 :help "Edit file at cursor"))
1419 (define-key map [menu-bar immediate create-directory] 1419 (define-key map [menu-bar immediate create-directory]
1420 '(menu-item "Create Directory..." dired-create-directory)) 1420 '(menu-item "Create Directory..." dired-create-directory
1421 :help "Create a directory"))
1421 (define-key map [menu-bar immediate wdired-mode] 1422 (define-key map [menu-bar immediate wdired-mode]
1422 '(menu-item "Edit File Names" wdired-change-to-wdired-mode 1423 '(menu-item "Edit File Names" wdired-change-to-wdired-mode
1424 :help "Put a dired buffer in a mode in which filenames are editable"
1423 :filter (lambda (x) (if (eq major-mode 'dired-mode) x)))) 1425 :filter (lambda (x) (if (eq major-mode 'dired-mode) x))))
1424 1426
1425 (define-key map [menu-bar regexp] 1427 (define-key map [menu-bar regexp]
1426 (cons "Regexp" (make-sparse-keymap "Regexp"))) 1428 (cons "Regexp" (make-sparse-keymap "Regexp")))
1427 1429