summaryrefslogtreecommitdiffhomepage
path: root/init.org
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-03-18 21:32:52 +0000
committerjao <jao@gnu.org>2022-03-18 21:32:52 +0000
commit56c3ee88fb13d9aa2d60e84892039131a42531bc (patch)
treeef50b56b2efc2664081cb65c44667e87a43be494 /init.org
parenta26b7a8116556349ee3a53fc329fcf73e5655dff (diff)
downloadelibs-56c3ee88fb13d9aa2d60e84892039131a42531bc.tar.gz
elibs-56c3ee88fb13d9aa2d60e84892039131a42531bc.tar.bz2
dired clean-ups
Diffstat (limited to 'init.org')
-rw-r--r--init.org50
1 files changed, 25 insertions, 25 deletions
diff --git a/init.org b/init.org
index a0200c0..b0c1148 100644
--- a/init.org
+++ b/init.org
@@ -912,35 +912,35 @@
*** dired
- [[https://www.masteringemacs.org/article/working-multiple-files-dired][Working with multiple files in dired - Mastering Emacs]]
#+begin_src emacs-lisp
- (require 'dired)
- (require 'dired-x nil t)
- (put 'dired-find-alternate-file 'disabled nil)
-
- (setq dired-recursive-deletes 'top)
- (setq dired-recursive-copies 'top)
- (setq dired-listing-switches "-alhF --group-directories-first")
- (setq dired-free-space-args "-Ph")
- (setq ls-lisp-dirs-first t)
- (setq dired-dwim-target t)
- (setq wdired-create-parent-directories t)
- (setq dired-kill-when-opening-new-dired-buffer t)
+ (use-package dired
+ :init
+ (setq dired-recursive-deletes 'top
+ dired-recursive-copies 'top
+ dired-listing-switches "-alhF --group-directories-first"
+ dired-free-space-args "-Ph"
+ ls-lisp-dirs-first t
+ dired-dwim-target t
+ dired-kill-when-opening-new-dired-buffer t
+ dired-mouse-drag-files t
+ wdired-create-parent-directories t)
+
+ (put 'dired-find-alternate-file 'disabled nil)
+ :hook (dired-mode . turn-on-gnus-dired-mode)
+ :bind (:map dired-mode-map
+ ("C-c C-r" . wdired-change-to-wdired-mode)
+ ("C-M-m" . gnus-dired-attach)))
+
+ (use-package dired-x :demand t)
(use-package find-dired
- :init
- (setq find-ls-option '("-print0 | xargs -0 ls -ld" . "-ld")))
+ :init (setq find-ls-option '("-print0 | xargs -0 ls -ld" . "-ld"))
+ :bind ("C-c D" . find-name-dired))
- (add-hook 'dired-mode-hook #'turn-on-gnus-dired-mode)
- (define-key dired-mode-map [(control meta ?m)] #'gnus-dired-attach)
- (define-key dired-mode-map (kbd "C-c C-r") #'wdired-change-to-wdired-mode)
- (global-set-key (kbd "C-c D") #'find-name-dired)
+ (use-package dired-git-info
+ :ensure t
+ :bind (:map dired-mode-map (")" . dired-git-info-mode)))
- #+END_SRC
-***** Dired packages
- #+BEGIN_SRC emacs-lisp
- (use-package dired-git-info
- :ensure t
- :bind (:map dired-mode-map (")" . dired-git-info-mode)))
- #+END_SRC
+ #+end_src
* General editing
*** Executable scripts
#+begin_src emacs-lisp