diff options
author | Case Duckworth | 2021-09-06 12:50:27 -0500 |
---|---|---|
committer | Case Duckworth | 2021-09-06 12:50:27 -0500 |
commit | 7e686a159367ab119b7a94683f97cb24e61dd1c4 (patch) | |
tree | 44ec2684e1eccf98ca7c373bbd3e07908cdba5c2 | |
parent | Quit setup form if `straight-use-package' returns nil (diff) | |
download | emacs-7e686a159367ab119b7a94683f97cb24e61dd1c4.tar.gz emacs-7e686a159367ab119b7a94683f97cb24e61dd1c4.zip |
Reorganize dired-mode setup
-rw-r--r-- | init.el | 26 |
1 files changed, 11 insertions, 15 deletions
diff --git a/init.el b/init.el index dceb56f..a2fb982 100644 --- a/init.el +++ b/init.el | |||
@@ -455,6 +455,10 @@ AKA, DO NOT USE THIS FUNCTION!!!" | |||
455 | 455 | ||
456 | (setup dired | 456 | (setup dired |
457 | (:also-load dired-x) | 457 | (:also-load dired-x) |
458 | (:straight dired-subtree | ||
459 | dired-collapse | ||
460 | dired-git-info) | ||
461 | |||
458 | (:option dired-recursive-copies 'always | 462 | (:option dired-recursive-copies 'always |
459 | dired-recursive-deletes 'always | 463 | dired-recursive-deletes 'always |
460 | delete-by-moving-to-trash t | 464 | delete-by-moving-to-trash t |
@@ -467,7 +471,12 @@ AKA, DO NOT USE THIS FUNCTION!!!" | |||
467 | shell touch symlink) | 471 | shell touch symlink) |
468 | dired-dwim-target t) | 472 | dired-dwim-target t) |
469 | 473 | ||
470 | (:hook dired-hide-details-mode | 474 | (:bind "TAB" #'dired-subtree-cycle |
475 | "i" #'dired-subtree-toggle | ||
476 | ")" #'dired-git-info-mode) | ||
477 | |||
478 | (:hook dired-collapse-mode | ||
479 | dired-hide-details-mode | ||
471 | hl-line-mode) | 480 | hl-line-mode) |
472 | 481 | ||
473 | (:global "C-x C-j" #'dired-jump) | 482 | (:global "C-x C-j" #'dired-jump) |
@@ -479,20 +488,7 @@ AKA, DO NOT USE THIS FUNCTION!!!" | |||
479 | (:bind "RET" #'dired-w32-browser)) | 488 | (:bind "RET" #'dired-w32-browser)) |
480 | (:home (:straight dired-open) | 489 | (:home (:straight dired-open) |
481 | (autoload #'dired-find-alternate-file "dired-open" nil t) | 490 | (autoload #'dired-find-alternate-file "dired-open" nil t) |
482 | (:bind "RET" #'dired-find-alternate-file))) | 491 | (:bind "RET" #'dired-find-alternate-file))))) |
483 | |||
484 | (:straight dired-subtree) | ||
485 | (:bind "i" #'dired-subtree-toggle | ||
486 | "TAB" #'dired-subtree-cycle) | ||
487 | |||
488 | (:straight dired-collapse) | ||
489 | (:hook dired-collapse-mode) | ||
490 | |||
491 | (:straight dired-git-info) | ||
492 | (:bind ")" #'dired-git-info-mode) | ||
493 | |||
494 | (:straight trashed) | ||
495 | (:option trashed-action-confirmer #'y-or-n-p))) | ||
496 | 492 | ||
497 | (setup disabled | 493 | (setup disabled |
498 | ;; While this stuff is defined in novice.el, I'm using 'disabled' as the name | 494 | ;; While this stuff is defined in novice.el, I'm using 'disabled' as the name |