branch: elpa/geiser-kawa commit e440789aa38a619a011ab1e22cd51baab32c63e4 Author: spellcard199 <spellcard...@protonmail.com> Commit: spellcard199 <spellcard...@protonmail.com>
Add optional arg to function checking for jar file --- elisp/geiser-kawa.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/elisp/geiser-kawa.el b/elisp/geiser-kawa.el index 15607a9..ff9011c 100644 --- a/elisp/geiser-kawa.el +++ b/elisp/geiser-kawa.el @@ -123,11 +123,14 @@ (remove-hook 'compilation-finish-functions #'geiser-kawa--deps-run-kawa-remove-compil-hook)) -(defun geiser-kawa--deps-run-kawa-advice() +(defun geiser-kawa--deps-run-kawa-advice(&optional install-if-absent) (if (file-exists-p geiser-kawa-deps-jar-path) (geiser-kawa--deps-run-kawa-unadviced) - (when (y-or-n-p - "geiser-kawa depends on additional java libraries. Do you want to download and compile them now?") + (when (or install-if-absent + (y-or-n-p + (concat + "geiser-kawa depends on additional java libraries. " + "Do you want to download and compile them now?"))) (geiser-kawa--deps-run-kawa--add-compil-hook) (geiser-kawa-deps-mvn-package))))