mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00
Code Issues Releases Activity

(dired-mode-map): Rebind dired-flag-garbage-files' from &' to `%&'.

Browse Source 
Bind `&' to `dired-do-async-shell-command'.
This commit is contained in:
Juri Linkov 2008-07-29 16:37:31 +00:00
parent 5ec0c89248
commit 48e740bfe4
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/ChangeLog
View File

@ -1,3 +1,10 @@
2008-07-29 Juri Linkov <juri@jurta.org>
* dired-aux.el (dired-do-async-shell-command): New command.
* dired.el (dired-mode-map): Rebind `dired-flag-garbage-files'
from `&' to `%&'. Bind `&' to `dired-do-async-shell-command'.
2008-07-29 Juri Linkov <juri@jurta.org>
* international/mule-cmds.el (ucs-names): New internal variable.

3
lisp/dired.el
View File

@ -1195,7 +1195,6 @@ Do so according to the former subdir alist OLD-SUBDIR-ALIST."
(define-key map "#" 'dired-flag-auto-save-files)
(define-key map "." 'dired-clean-directory)
(define-key map "~" 'dired-flag-backup-files)
(define-key map "&" 'dired-flag-garbage-files)
;; Upper case keys (except !) for operating on the marked files
(define-key map "A" 'dired-do-search)
(define-key map "C" 'dired-do-copy)
@ -1214,6 +1213,7 @@ Do so according to the former subdir alist OLD-SUBDIR-ALIST."
(define-key map "X" 'dired-do-shell-command)
(define-key map "Z" 'dired-do-compress)
(define-key map "!" 'dired-do-shell-command)
(define-key map "&" 'dired-do-async-shell-command)
;; Comparison commands
(define-key map "=" 'dired-diff)
(define-key map "\M-=" 'dired-backup-diff)
@ -1241,6 +1241,7 @@ Do so according to the former subdir alist OLD-SUBDIR-ALIST."
(define-key map "%H" 'dired-do-hardlink-regexp)
(define-key map "%R" 'dired-do-rename-regexp)
(define-key map "%S" 'dired-do-symlink-regexp)
(define-key map "%&" 'dired-flag-garbage-files)
;; Commands for marking and unmarking.
(define-key map "*" nil)
(define-key map "**" 'dired-mark-executables)