Remove (interactive) from non-interactive funcs
This commit is contained in:
parent
9c7e431de7
commit
e87d278811
2 changed files with 1 additions and 2 deletions
|
@ -21,7 +21,7 @@ command line args following a double dash (each arg should be in the
|
||||||
'module/submodule' format).
|
'module/submodule' format).
|
||||||
|
|
||||||
If neither is available, run all tests in all enabled modules."
|
If neither is available, run all tests in all enabled modules."
|
||||||
(interactive) ;; TODO Add completing-read selection of tests
|
(interactive) ; must be interactive to be run from batch
|
||||||
;; FIXME Refactor this
|
;; FIXME Refactor this
|
||||||
(condition-case-unless-debug ex
|
(condition-case-unless-debug ex
|
||||||
(let (targets)
|
(let (targets)
|
||||||
|
|
|
@ -108,7 +108,6 @@ like a space that `whitespace-mode' won't affect.")
|
||||||
(defun doom-quit-p (&optional prompt)
|
(defun doom-quit-p (&optional prompt)
|
||||||
"Return t if this session should be killed. Prompts the user for
|
"Return t if this session should be killed. Prompts the user for
|
||||||
confirmation."
|
confirmation."
|
||||||
(interactive)
|
|
||||||
(if (ignore-errors (doom-real-buffer-list))
|
(if (ignore-errors (doom-real-buffer-list))
|
||||||
(or (yes-or-no-p (format "››› %s" (or prompt "Quit Emacs?")))
|
(or (yes-or-no-p (format "››› %s" (or prompt "Quit Emacs?")))
|
||||||
(ignore (message "Aborted")))
|
(ignore (message "Aborted")))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue