amogus2/emacs-dotfiles
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add option: minimal-emacs-dired-group-directories-first

Browse Source
This commit is contained in:
James Cherti
2025-07-05 14:31:28 -04:00
parent afffa5bade
commit c9cd53c408
2 changed files with 13 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
init.el
View File

@@ -427,14 +427,16 @@
(setq dired-omit-files (concat "\\`[.]\\'"))
;; Group directories first
(let ((args "--group-directories-first -ahlv"))
(when (or (eq system-type 'darwin)
(eq system-type 'berkeley-unix))
(if-let* ((gls (executable-find "gls")))
(setq insert-directory-program gls)
(setq args nil)))
(when args
(setq dired-listing-switches args)))
(when minimal-emacs-dired-group-directories-first
(with-eval-after-load 'dired
(let ((args "--group-directories-first -ahlv"))
(when (or (eq system-type 'darwin)
(eq system-type 'berkeley-unix))
(if-let* ((gls (executable-find "gls")))
(setq insert-directory-program gls)
(setq args nil)))
(when args
(setq dired-listing-switches args)))))
(setq ls-lisp-verbosity nil)
(setq ls-lisp-dirs-first t)