diff options
| author | Amin Bandali <bandali@kelar.org> | 2025-02-09 02:09:16 -0500 |
|---|---|---|
| committer | Amin Bandali <bandali@kelar.org> | 2025-02-09 02:09:16 -0500 |
| commit | 99332da43b8324814ca6c1af7f0076f83c8ce233 (patch) | |
| tree | aa4e84443aa9be8e1fedf6e61867da43d109c5b7 /.emacs.d/lisp/bandali-dired.el | |
| parent | ec565f9daf3d2af52d83dae9dfbbde4652fd6601 (diff) | |
| download | configs-99332da43b8324814ca6c1af7f0076f83c8ce233.tar.gz configs-99332da43b8324814ca6c1af7f0076f83c8ce233.tar.xz configs-99332da43b8324814ca6c1af7f0076f83c8ce233.zip | |
Port the rest of my GNU Emacs configuration to use-package
Diffstat (limited to '')
| -rw-r--r-- | .emacs.d/lisp/bandali-dired.el | 46 |
1 files changed, 25 insertions, 21 deletions
diff --git a/.emacs.d/lisp/bandali-dired.el b/.emacs.d/lisp/bandali-dired.el index 18392c0..982af2c 100644 --- a/.emacs.d/lisp/bandali-dired.el +++ b/.emacs.d/lisp/bandali-dired.el @@ -24,15 +24,25 @@ ;;; Code: -(with-eval-after-load 'dired - ;; (require 'ls-lisp) - (setopt - dired-dwim-target t - ;; dired-listing-switches "-alh --group-directories-first" - dired-listing-switches "-alh" - ;; ls-lisp-dirs-first t - ls-lisp-use-insert-directory-program nil) - +(use-package dired + :defer t + :init (require 'ls-lisp) + :bind + (:map + dired-mode-map + ("b" . dired-up-directory) + ("E" . dired-ediff-files) + ("e" . dired-toggle-read-only) + ("\\" . dired-hide-details-mode)) + :hook + (dired-mode . dired-hide-details-mode) + :custom + (dired-dwim-target-next t) + ;; (dired-listing-switches "-alh --group-directories-first") + (dired-listing-switches "-alh") + ;; (ls-lisp-dirs-first t) + (ls-lisp-use-insert-directory-program nil) + :config (declare-function dired-dwim-target-directory "dired-aux") ;; easily diff 2 marked files ;; https://oremacs.com/2017/03/18/dired-ediff/ @@ -56,18 +66,12 @@ (lambda () (setq ediff-after-quit-hook-internal nil) (set-window-configuration wnd)))) - (error "no more than 2 files should be marked")))) - - ;; local key bindings - (let ((m dired-mode-map)) - (b/keymap-set m "b" #'dired-up-directory) - (b/keymap-set m "E" #'dired-ediff-files) - (b/keymap-set m "e" #'dired-toggle-read-only) - (b/keymap-set m "\\" #'dired-hide-details-mode)) + (error "no more than 2 files should be marked"))))) - (require 'dired-x) - (setopt - dired-guess-shell-alist-user +(use-package dired-x + :after dired + :custom + (dired-guess-shell-alist-user '(("\\.pdf\\'" "atril" "evince" "zathura" "okular") ("\\.doc\\'" "libreoffice") ("\\.docx\\'" "libreoffice") @@ -76,7 +80,7 @@ ("\\.xls\\'" "libreoffice") ("\\.xlsx\\'" "libreoffice") ("\\.flac\\'" "mpv")))) -(add-hook 'dired-mode-hook #'dired-hide-details-mode) + (provide 'bandali-dired) ;;; bandali-dired.el ends here |