emacs/dired: add diredfl & refactor

- Adds C-c C-e for invoking wdired
- Adds diredfl for more colors in dired (and disables dired-k's coloring
  based on mtime, which was confusing)
This commit is contained in:
Henrik Lissner 2019-05-20 16:04:01 -04:00
parent 9561331d05
commit 57697efb62
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 18 additions and 4 deletions

View file

@ -7,8 +7,6 @@
dired-recursive-copies 'always
dired-recursive-deletes 'top
;; Auto refresh dired, but be quiet about it
global-auto-revert-non-file-buffers t
auto-revert-verbose nil
dired-hide-details-hide-symlink-targets nil
;; files
image-dired-dir (concat doom-cache-dir "image-dired/")
@ -28,8 +26,16 @@
(setq args (delete "--group-directories-first" args))))
(setq dired-listing-switches (string-join args " ")))
(define-key! dired-mode-map
;; Kill buffer when quitting dired buffers
(define-key dired-mode-map [remap quit-window] (λ! (quit-window t))))
[remap quit-window] (λ! (quit-window t))
;; To be consistent with ivy/helm+wgrep integration
"C-c C-e" #'wdired-change-to-wdired-mode))
(def-package! diredfl
:unless (featurep! +ranger)
:hook (dired-mode . diredfl-mode))
(def-package! dired-k
@ -37,6 +43,13 @@
:hook (dired-initial-position . dired-k)
:hook (dired-after-readin . dired-k-no-revert)
:config
(setq dired-k-style 'git
dired-k-padding 1)
;; Don't highlight based on mtime, this interferes with diredfl and is more
;; confusing than helpful.
(advice-add #'dired-k--highlight-by-file-attribyte :override #'ignore)
(defun +dired*interrupt-process (orig-fn &rest args)
"Fixes dired-k killing git processes too abruptly, leaving behind disruptive
.git/index.lock files."

View file

@ -1,6 +1,7 @@
;; -*- no-byte-compile: t; -*-
;;; emacs/dired/packages.el
(package! diredfl)
(package! dired-k)
(when (featurep! +ranger)
(package! ranger))