Commit 7cce3c91 authored by Chong Yidong's avatar Chong Yidong
Browse files

* dired.el (dired-mode-map): Move encryption items to "Operate"

menu (Bug#4703).
parent d7063de9
2009-11-15 Chong Yidong <cyd@stupidchicken.com>
* dired.el (dired-mode-map): Move encryption items to "Operate"
menu (Bug#4703).
* strokes.el (strokes-update-window-configuration): Make strokes
buffer current before erasing (Bug#4906).
......
......@@ -1410,29 +1410,6 @@ Do so according to the former subdir alist OLD-SUBDIR-ALIST."
(define-key map [menu-bar immediate]
(cons "Immediate" (make-sparse-keymap "Immediate")))
(define-key map
[menu-bar immediate epa-dired-do-decrypt]
'(menu-item "Decrypt" epa-dired-do-decrypt
:help "Decrypt file at cursor"))
(define-key map
[menu-bar immediate epa-dired-do-verify]
'(menu-item "Verify" epa-dired-do-verify
:help "Verify digital signature of file at cursor"))
(define-key map
[menu-bar immediate epa-dired-do-sign]
'(menu-item "Sign" epa-dired-do-sign
:help "Create digital signature of file at cursor"))
(define-key map
[menu-bar immediate epa-dired-do-encrypt]
'(menu-item "Encrypt" epa-dired-do-encrypt
:help "Encrypt file at cursor"))
(define-key map [menu-bar immediate dashes-4]
'("--"))
(define-key map
[menu-bar immediate image-dired-dired-display-external]
'(menu-item "Display Image Externally" image-dired-dired-display-external
......@@ -1442,9 +1419,6 @@ Do so according to the former subdir alist OLD-SUBDIR-ALIST."
'(menu-item "Display Image" image-dired-dired-display-image
:help "Display sized image in a separate window"))
(define-key map [menu-bar immediate dashes-4]
'("--"))
(define-key map [menu-bar immediate revert-buffer]
'(menu-item "Refresh" revert-buffer
:help "Update contents of shown directories"))
......@@ -1603,6 +1577,29 @@ Do so according to the former subdir alist OLD-SUBDIR-ALIST."
'(menu-item "Display image thumbnails" image-dired-display-thumbs
:help "Display image thumbnails for current or marked image files"))
(define-key map [menu-bar operate dashes-4]
'("--"))
(define-key map
[menu-bar operate epa-dired-do-decrypt]
'(menu-item "Decrypt" epa-dired-do-decrypt
:help "Decrypt file at cursor"))
(define-key map
[menu-bar operate epa-dired-do-verify]
'(menu-item "Verify" epa-dired-do-verify
:help "Verify digital signature of file at cursor"))
(define-key map
[menu-bar operate epa-dired-do-sign]
'(menu-item "Sign" epa-dired-do-sign
:help "Create digital signature of file at cursor"))
(define-key map
[menu-bar operate epa-dired-do-encrypt]
'(menu-item "Encrypt" epa-dired-do-encrypt
:help "Encrypt file at cursor"))
(define-key map [menu-bar operate dashes-3]
'("--"))
......@@ -3471,7 +3468,7 @@ Ask means pop up a menu for the user to select one of copy, move or link."
;;;;;; dired-run-shell-command dired-do-shell-command dired-do-async-shell-command
;;;;;; dired-clean-directory dired-do-print dired-do-touch dired-do-chown
;;;;;; dired-do-chgrp dired-do-chmod dired-compare-directories dired-backup-diff
;;;;;; dired-diff) "dired-aux" "dired-aux.el" "e207e02ac395d10ee4a09e208081a0ce")
;;;;;; dired-diff) "dired-aux" "dired-aux.el" "87433c3c284e8cef58102a1583e29438")
;;; Generated autoloads from dired-aux.el
(autoload 'dired-diff "dired-aux" "\
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment