diff options
| author | Ravi R Kiran <aine.marina@gmail.com> | 2014-05-04 18:57:33 (GMT) |
|---|---|---|
| committer | Ravikiran Rajagopal <aine.marina@gmail.com> | 2014-05-04 18:57:33 (GMT) |
| commit | 89fe6b3cc63ed87f157d945ac3dce55ec82ddce6 (patch) | |
| tree | 86fc96d19dd4014d49d65a3d8846c7cda20abac5 /ravi-init-dired.el | |
| parent | e6b3e691deff0b44de9011613d5af9bc15ff4ff1 (diff) | |
| download | dotemacs-89fe6b3cc63ed87f157d945ac3dce55ec82ddce6.zip dotemacs-89fe6b3cc63ed87f157d945ac3dce55ec82ddce6.tar.gz dotemacs-89fe6b3cc63ed87f157d945ac3dce55ec82ddce6.tar.bz2 | |
Simpler keybindings and guide-key support
Diffstat (limited to 'ravi-init-dired.el')
| -rw-r--r-- | ravi-init-dired.el | 45 |
1 files changed, 28 insertions, 17 deletions
diff --git a/ravi-init-dired.el b/ravi-init-dired.el index a92f546..8db82f9 100644 --- a/ravi-init-dired.el +++ b/ravi-init-dired.el @@ -64,23 +64,24 @@ (use-package dired-subtree :ensure t :config - (bind-keys :map dired-mode-map - :prefix "C-," - :prefix-map dired-subtree-map - :prefix-docstring "Dired subtree map." - ("<f5>" . dired-subtree-insert) - ("C-/" . dired-subtree-apply-filter) - ("C-k" . dired-subtree-remove) - ("C-n" . dired-subtree-next-sibling) - ("C-p" . dired-subtree-previous-sibling) - ("C-u" . dired-subtree-up) - ("C-d" . dired-subtree-down) - ("C-a" . dired-subtree-beginning) - ("C-e" . dired-subtree-end) - ("m" . dired-subtree-mark-subtree) - ("u" . dired-subtree-unmark-subtree) - ("C-o C-f" . dired-subtree-only-this-file) - ("C-o C-d" . dired-subtree-only-this-directory)) + (progn + (bind-keys :map dired-mode-map + :prefix "," + :prefix-map dired-subtree-map + :prefix-docstring "Dired subtree map." + ("/" . dired-subtree-apply-filter) + ("k" . dired-subtree-remove) + ("n" . dired-subtree-next-sibling) + ("p" . dired-subtree-previous-sibling) + ("u" . dired-subtree-up) + ("d" . dired-subtree-down) + ("a" . dired-subtree-beginning) + ("e" . dired-subtree-end) + ("m" . dired-subtree-mark-subtree) + ("u" . dired-subtree-unmark-subtree) + ("C-o C-f" . dired-subtree-only-this-file) + ("C-o C-d" . dired-subtree-only-this-directory)) + (bind-key "e" 'dired-subtree-insert dired-mode-map)) ) (defconst my-dired-media-files-extensions '("mp3" "mp4" "MP3" "MP4" "avi" "mpg" "flv" "ogg") @@ -129,6 +130,16 @@ Also used for highlighting.") wdired-abort-changes) (eval `(defadvice ,it (after revert-buffer activate) (revert-buffer)))) + + (defun ravi/dired-guide-key-hook () + (guide-key/add-local-guide-key-sequence "%") + (guide-key/add-local-guide-key-sequence "*") + (guide-key/add-local-guide-key-sequence "/") + (guide-key/add-local-guide-key-sequence ",") + (guide-key/add-local-guide-key-sequence "C-t") + ) + (add-hook 'dired-mode-hook 'ravi/dired-guide-key-hook) + )) (provide 'ravi-init-dired) |