summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2021-03-16 09:29:53 -0500
committerCase Duckworth2021-03-16 09:29:53 -0500
commitc21f21afab7514c312dae9bd500a703cd87c21cf (patch)
tree7f2a5df16a55a162f9ac801357d05d2b7c8944bd
parentFix typo (diff)
downloademacs-c21f21afab7514c312dae9bd500a703cd87c21cf.tar.gz
emacs-c21f21afab7514c312dae9bd500a703cd87c21cf.zip
"Package-ize" dired
-rw-r--r--init.el35
1 files changed, 16 insertions, 19 deletions
diff --git a/init.el b/init.el index d2d5b68..47b8462 100644 --- a/init.el +++ b/init.el
@@ -367,29 +367,26 @@ indicator in the mode-line."
367 (prog-mode-hook goto-address-prog-mode))) 367 (prog-mode-hook goto-address-prog-mode)))
368 368
369;;; Dired 369;;; Dired
370 370(acdw/pkg dired
371(acdw/set `((dired-recursive-copies always) 371 :local t
372 :set `((dired-recursive-copies always)
372 (dired-recursive-deletes always) 373 (dired-recursive-deletes always)
373 (delete-by-moving-to-trash t) 374 (delete-by-moving-to-trash t)
374 (dired-listing-switches "-Al") 375 (dired-listing-switches "-Al")
375 (ls-lisp-dirs-first t) 376 (ls-lisp-dirs-first t)
376 (dired-dwim-target t))) 377 (dired-dwim-target t))
377 378 :now ((autoload 'dired-mode-map "dired" nil nil 'keymap)
378(defun hook--dired-mode () 379 (acdw/pkg dired-subtree)
379 (hl-line-mode +1) 380 (acdw/pkg dired-x
380 (dired-hide-details-mode +1)) 381 :local t
381(add-hook 'dired-mode-hook #'hook--dired-mode) 382 :binds (("C-x C-j" dired-jump)))
382 383 (acdw/pkg dired-collapse
383(acdw/bind "C-x C-j" dired-jump :after "dired-x") 384 :hooks ((dired-mode-hook dired-collapse-mode)))
384 385 (defun hook--dired-mode ()
385(with-eval-after-load 'dired 386 (hl-line-mode +1)
386 ;; I tried `autoload'ing the keymap, and it just wouldn't work. I have no 387 (dired-hide-details-mode +1)))
387 ;; idea what the issue was. 388 :hooks ((dired-mode-hook hook--dired-mode))
388 (acdw/pkg dired-subtree 389 :binds (("i" dired-subtree-toggle :map dired-mode-map)))
389 :binds (("i" dired-subtree-toggle :map dired-mode-map))))
390
391(acdw/pkg dired-collapse
392 :hooks ((dired-mode-hook dired-collapse-mode)))
393 390
394;;; Eshell 391;;; Eshell
395 392