Skip to content

Commit e12ee0c

Browse files
committed
refactor(core): move a variable to me-vars
1 parent d35f55c commit e12ee0c

File tree

2 files changed

+2
-4
lines changed

2 files changed

+2
-4
lines changed

core/me-vars.el

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -99,6 +99,7 @@ environment variable \"$MINEMACS_IGNORE_USER_CONFIG\".")
9999
(if (file-directory-p "~/.minemacs.d/") "~/.minemacs.d/" (concat minemacs-root-dir "user-config/"))))
100100
"MinEmacs user customization directory.")
101101

102+
(defconst minemacs-started-with-extra-args-p (and (cdr command-line-args) t) "Has Emacs been started with extras arguments? like a file name or so.")
102103
(defconst os/linux (eq system-type 'gnu/linux) "Non-nil on GNU/Linux systems.")
103104
(defconst os/bsd (and (memq system-type '(berkeley-unix gnu/kfreebsd)) t) "Non-nil on BSD systems.")
104105
(defconst os/win (and (memq system-type '(cygwin windows-nt ms-dos)) t) "Non-nil on Windows systems.")

modules/me-files.el

Lines changed: 1 addition & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -8,12 +8,9 @@
88

99
;;; Code:
1010

11-
(defconst minemacs-started-with-directory-p
12-
(let ((args (cdr command-line-args))) (cl-some #'file-directory-p args)))
13-
1411
(use-package dirvish
1512
:straight t
16-
:demand minemacs-started-with-directory-p
13+
:demand minemacs-started-with-extra-args-p
1714
:custom
1815
(dirvish-attributes '(subtree-state nerd-icons file-size vc-state git-msg))
1916
(dirvish-cache-dir (+directory-ensure minemacs-cache-dir "dirvish/"))

0 commit comments

Comments
 (0)