@@ -672,25 +672,25 @@ choose."
672672 " Find `cider-lein-command' on `exec-path' if possible, or return `nil' .
673673
674674In case `default-directory' is non-local we assume the command is available."
675- (or (file-remote-p default-directory)
676- (executable-find cider-lein-command)
677- (executable-find (concat cider-lein-command " .bat" ))))
675+ (shell-quote-argument ( or (file-remote-p default-directory)
676+ (executable-find cider-lein-command)
677+ (executable-find (concat cider-lein-command " .bat" ) ))))
678678
679679(defun cider--boot-resolve-command ()
680680 " Find `cider-boot-command' on `exec-path' if possible, or return `nil' .
681681
682682In case `default-directory' is non-local we assume the command is available."
683- (or (file-remote-p default-directory)
684- (executable-find cider-boot-command)
685- (executable-find (concat cider-boot-command " .exe" ))))
683+ (shell-quote-argument ( or (file-remote-p default-directory)
684+ (executable-find cider-boot-command)
685+ (executable-find (concat cider-boot-command " .exe" ) ))))
686686
687687(defun cider--gradle-resolve-command ()
688688 " Find `cider-gradle-command' on `exec-path' if possible, or return `nil' .
689689
690690In case `default-directory' is non-local we assume the command is available."
691- (or (file-remote-p default-directory)
692- (executable-find cider-gradle-command)
693- (executable-find (concat cider-gradle-command " .exe" ))))
691+ (shell-quote-argument ( or (file-remote-p default-directory)
692+ (executable-find cider-gradle-command)
693+ (executable-find (concat cider-gradle-command " .exe" ) ))))
694694
695695
696696; ;; Check that the connection is working well
0 commit comments