Move dired group directories first to the README.md file

README.md

@@ -1587,6 +1587,16 @@ In Emacs, customization variables modified via the UI (e.g., `M-x customize`) ar
                                "\\|^flymake_.*"))
 (add-hook 'dired-mode-hook #'dired-omit-mode)
 
+;; 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))))
+
 ;; Enables visual indication of minibuffer recursion depth after initialization.
 (add-hook 'after-init-hook #'minibuffer-depth-indicate-mode)
 

early-init.el

@@ -96,9 +96,6 @@ modified during setup.")
 (defvar minimal-emacs-user-directory user-emacs-directory
   "The default value of the `user-emacs-directory' variable.")
 
-(defvar minimal-emacs-dired-group-directories-first nil
-  "If non-nil, group directories first in Dired listings.")
-
 ;;; Load pre-early-init.el
 
 ;; Prefer loading newer compiled files

init.el

@@ -416,18 +416,6 @@
 (setq dired-omit-verbose nil)
 (setq dired-omit-files (concat "\\`[.]\\'"))
 
-;; Group directories first
-(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)