File tree Expand file tree Collapse file tree 3 files changed +6
-6
lines changed
test/fixtures/mini.emacs.pkg.1 Expand file tree Collapse file tree 3 files changed +6
-6
lines changed Original file line number Diff line number Diff line change @@ -90,19 +90,19 @@ Arguments FNC and ARGS are used for advice `:around'."
9090(defconst eask-is-pkg (getenv " EASK_IS_PKG" )
9191 " Eask is pkg." )
9292
93- (defconst eask-rest-args
93+ (defconst eask-rest
9494 (let ((args (getenv " EASK_REST_ARGS" )))
95- (setq args (split-string args " ," ))
95+ (setq args (ignore-errors ( split-string args " ," ) ))
9696 args)
9797 " Eask arguments in list after command separator `--' .
9898
9999If the argument is `-- hello world'; it will return `(hello world)'." )
100100
101- (defun eask-rest-args ()
101+ (defun eask-rest ()
102102 " Eask arguments in string after command separator `--' .
103103
104104If the argument is `-- hello world'; it will return `hello world'."
105- (mapconcat #'identity eask-rest-args " " ))
105+ (mapconcat #'identity eask-rest " " ))
106106
107107(defcustom eask-import-timeout 10
108108 " Number of seconds before timing out elisp importation attempts.
Original file line number Diff line number Diff line change 4444 ; ;
4545 ; ; We must split up all commands!
4646 (setq command (eask-s-replace " && " " \n " command)))
47- (setq command (concat command " " (eask-rest-args )))
47+ (setq command (concat command " " (eask-rest)))
4848 (write-region (concat command " \n " ) nil eask--run-file t ))
4949
5050(defun eask--unmatched-scripts (scripts )
Original file line number Diff line number Diff line change 1717(eask-defcommand mini-test-2 "Test command 2." (message "Test 2"))
1818(eask-defcommand mini-test-3
1919 "Test command 3."
20- (message "Test 3: %s" eask-rest-args ))
20+ (message "Test 3: %s" eask-rest))
2121
2222(source "gnu")
2323(source "melpa")
You can’t perform that action at this time.
0 commit comments