+11
-8
lines changedFilter options
+11
-8
lines changed Original file line number Diff line number Diff line change
@@ -172,7 +172,10 @@ workspace has no valid Eask-file; it will load global workspace instead."
172 172 173 173
This is added because we don't want to pollute `error' and `warn' functions."
174 174
(eask-command-p '("load" "exec" "emacs" "eval" "repl"
175 -
"run/script" "run/command")))
175 +
"run/script" "run/command"
176 +
;; NOTE: These test commands handle the exit code themselves;
177 +
;; therefore, we don't need to handle it for them!
178 +
"test/ert" "test/ert-runner")))
176 179 177 180
(defun eask-checker-p ()
178 181
"Return t if running Eask as the checker.
@@ -1129,11 +1132,11 @@ This uses function `locate-dominating-file' to look up directory tree."
1129 1132
"Set up config directory in DIR, then execute BODY."
1130 1133
(declare (indent 1) (debug t))
1131 1134
`(let* ((user-emacs-directory (expand-file-name (concat ".eask/" emacs-version "/") ,dir))
1132 -
(package-user-dir (expand-file-name "elpa" user-emacs-directory))
1133 -
(early-init-file (locate-user-emacs-file "early-init.el"))
1134 -
(eask-dot-emacs-file (locate-user-emacs-file ".emacs"))
1135 -
(user-init-file (locate-user-emacs-file "init.el"))
1136 -
(custom-file (locate-user-emacs-file "custom.el")))
1135 +
(package-user-dir (expand-file-name "elpa" user-emacs-directory))
1136 +
(early-init-file (locate-user-emacs-file "early-init.el"))
1137 +
(eask-dot-emacs-file (locate-user-emacs-file ".emacs"))
1138 +
(user-init-file (locate-user-emacs-file "init.el"))
1139 +
(custom-file (locate-user-emacs-file "custom.el")))
1137 1140
,@body))
1138 1141 1139 1142
;; NOTE: If you modified this function, make sure you modified `core/emacs.el'
@@ -1161,9 +1164,9 @@ This uses function `locate-dominating-file' to look up directory tree."
1161 1164
(eask--handle-global-options)
1162 1165
(cond
1163 1166
((eask-config-p)
1164 -
(let ((early-init-file (locate-user-emacs-file "early-init.el"))
1167 +
(let ((early-init-file (locate-user-emacs-file "early-init.el"))
1165 1168
(eask-dot-emacs-file (locate-user-emacs-file "../.emacs"))
1166 -
(user-init-file (locate-user-emacs-file "init.el")))
1169 +
(user-init-file (locate-user-emacs-file "init.el")))
1167 1170
;; We accept Eask-file in `config' scope, but it shouldn't be used
1168 1171
;; for the sandbox.
1169 1172
(eask-with-verbosity 'debug
You can’t perform that action at this time.
RetroSearch is an open source project built by @garambo | Open a GitHub Issue
Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo
HTML:
3.2
| Encoding:
UTF-8
| Version:
0.7.4