blob: a83fa7a82edd4aa2fd79db2efcce180fec478bfb (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
;;; init-dired.el --- configure dired
;;; Commentary:
;;; Code:
(use-package dired
:init
;; show human readable sizes in dired and sort dotfiles first
(setq dired-listing-switches "-alhv")
;; show human readable free space
(setq directory-free-space-args "-h")
:bind (("M-<up>" . dired-up-directory))
:config
;; group directories first in dired if supported
(when (eq 0 (call-process insert-directory-program
nil nil nil "--group-directories-first"))
(setq dired-listing-switches (concat dired-listing-switches
" --group-directories-first"))))
(provide 'init-dired)
;;; init-dired.el ends here
|