Emacs: install and configure dired-subtree
Alan Pearce alan@alanpearce.co.uk
Sun, 06 Jul 2014 11:54:24 +0100
2 files changed, 17 insertions(+), 0 deletions(-)
M tag-emacs/emacs.d/Cask → tag-emacs/emacs.d/Cask
@@ -19,6 +19,7 @@ (depends-on "deferred") (depends-on "diff-hl") (depends-on "diminish") (depends-on "dired+") +(depends-on "dired-subtree") (depends-on "discover") (depends-on "discover-my-major") (depends-on "elisp-slime-nav")
M tag-emacs/emacs.d/init.el → tag-emacs/emacs.d/init.el
@@ -260,6 +260,22 @@ (dired-omit-mode 1) (setq dired-omit-files "#\\|\\.$" dired-find-subdir t))) +(req-package dired-subtree + :defer t + :config (progn + (setq dired-subtree-use-backgrounds nil) + (defun dired-subtree-maybe-up () + "Jump up one subtree or directory" + (interactive) + (let ((ov (dired-subtree--get-ov))) + (if ov + (progn (goto-char (overlay-start ov)) + (dired-previous-line 1)) + (dired-up-directory)))) + (bind-key "^" #'dired-subtree-maybe-up dired-mode-map)) + :init (progn + (bind-key "i" #'dired-subtree-insert dired-mode-map))) + ;;;; Documentation (req-package which-func