Mercurial > emacs
comparison lisp/dired.el @ 70920:fdc3645af42f
* dired.el (dired-mode-map): Add help-echo strings to tumme
commands.
* dired.el (dired-mode-map): Bind `tumme-dired-display-image'
to C-t i.
author | Mathias Dahl <mathias.dahl@gmail.com> |
---|---|
date | Thu, 25 May 2006 15:11:10 +0000 |
parents | bf18ea544a42 |
children | 88e8184b9f87 |
comparison
equal
deleted
inserted
replaced
70919:02241ad48da2 | 70920:fdc3645af42f |
---|---|
1315 (define-key map [menu-bar immediate tumme] | 1315 (define-key map [menu-bar immediate tumme] |
1316 (cons "Thumbnail Images" (make-sparse-keymap "tumme"))) | 1316 (cons "Thumbnail Images" (make-sparse-keymap "tumme"))) |
1317 | 1317 |
1318 (define-key map | 1318 (define-key map |
1319 [menu-bar immediate tumme tumme-mark-tagged-files] | 1319 [menu-bar immediate tumme tumme-mark-tagged-files] |
1320 '(menu-item "Mark From Image Tag..." | 1320 '(menu-item "Mark From Image Tag..." tumme-mark-tagged-files |
1321 tumme-mark-tagged-files)) | 1321 :help "Mark files whose image tags matches regexp")) |
1322 (define-key map | 1322 (define-key map |
1323 [menu-bar immediate tumme tumme-tag-remove] | 1323 [menu-bar immediate tumme tumme-tag-remove] |
1324 '(menu-item "Remove Image Tag..." | 1324 '(menu-item "Remove Image Tag..." tumme-tag-remove |
1325 tumme-tag-remove)) | 1325 :help "Remove image tag from current or marked files")) |
1326 (define-key map | 1326 (define-key map |
1327 [menu-bar immediate tumme tumme-tag-files] | 1327 [menu-bar immediate tumme tumme-tag-files] |
1328 '(menu-item "Add Image Tag..." | 1328 '(menu-item "Add Image Tag..." tumme-tag-files |
1329 tumme-tag-files)) | 1329 :help "Add image tag to current or marked files")) |
1330 (define-key map | 1330 (define-key map |
1331 [menu-bar immediate tumme tumme-dired-comment-files] | 1331 [menu-bar immediate tumme tumme-dired-comment-files] |
1332 '(menu-item "Add Comment" | 1332 '(menu-item "Add Comment..." tumme-dired-comment-files |
1333 tumme-dired-comment-files)) | 1333 :help "Add comment to current or marked files")) |
1334 (define-key map | 1334 (define-key map |
1335 [menu-bar immediate tumme tumme-dired-display-external] | 1335 [menu-bar immediate tumme tumme-dired-display-external] |
1336 '(menu-item "Display Image Externally" | 1336 '(menu-item "Display Image Externally" tumme-dired-display-external |
1337 tumme-dired-display-external)) | 1337 :help "Display image in external viewer")) |
1338 (define-key map | 1338 (define-key map |
1339 [menu-bar immediate tumme tumme-dired-display-image] | 1339 [menu-bar immediate tumme tumme-dired-display-image] |
1340 '(menu-item "Display Image" | 1340 '(menu-item "Display Image" tumme-dired-display-image |
1341 tumme-dired-display-image)) | 1341 :help "Display sized image in a separate window")) |
1342 (define-key map | 1342 (define-key map |
1343 [menu-bar immediate tumme tumme-display-thumbs] | 1343 [menu-bar immediate tumme tumme-display-thumbs] |
1344 '(menu-item "Display Thumbnails" | 1344 '(menu-item "Display Thumbnails" tumme-display-thumbs |
1345 tumme-display-thumbs)) | 1345 :help "Display thumbnails for current or marked image files")) |
1346 | 1346 |
1347 | 1347 |
1348 (define-key map [menu-bar immediate compare-directories] | 1348 (define-key map [menu-bar immediate compare-directories] |
1349 '(menu-item "Compare directories..." dired-compare-directories | 1349 '(menu-item "Compare directories..." dired-compare-directories |
1350 :help "Mark files with different attributes in two dired buffers")) | 1350 :help "Mark files with different attributes in two dired buffers")) |