revert: restore the original minemacs-directory-arg-p constant

This reverts commit 1d7aeb7.
abougouffa · Dec 19, 2023 · 9a1e46d · 9a1e46d
1 parent c57c147
commit 9a1e46d
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 6 deletions.
diff --git a/core/me-vars.el b/core/me-vars.el
@@ -82,11 +82,6 @@ environment variable \"$MINEMACS_IGNORE_USER_CONFIG\".")
           (const :tag "Log" 3)
           (const :tag "Debug" 4)))
 
-(defconst minemacs-directory-arg-p
-  (let ((args (cdr command-line-args))) (cl-some #'file-directory-p args)))
-
-(defconst minemacs-file-arg-p (and (cdr command-line-args) t))
-
 ;; Derive the root directory from this file path
 (defconst minemacs-root-dir (abbreviate-file-name (file-name-directory (directory-file-name (file-name-directory (file-truename load-file-name))))))
 (defconst minemacs-core-dir (concat minemacs-root-dir "core/"))

diff --git a/modules/me-files.el b/modules/me-files.el
@@ -8,9 +8,12 @@
 
 ;;; Code:
 
+(defconst minemacs-started-with-directory-p
+  (let ((args (cdr command-line-args))) (cl-some #'file-directory-p args)))
+
 (use-package dirvish
   :straight t
-  :demand minemacs-directory-arg-p
+  :demand minemacs-started-with-directory-p
   :custom
   (dirvish-attributes '(subtree-state nerd-icons file-size vc-state git-msg))
   (dirvish-cache-dir (+directory-ensure minemacs-cache-dir "dirvish/"))