Skip to content

Commit ec2866c

Browse files
committed
[Fix #1811] Handle properly jack-in commands with spaces in them
1 parent 0f64a61 commit ec2866c

File tree

2 files changed

+10
-9
lines changed

2 files changed

+10
-9
lines changed

CHANGELOG.md

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -51,6 +51,7 @@ the ns-browser.
5151
* [#1733](https://github.com/clojure-emacs/cider/pull/1733): Better error handling when no boot command is found in `exec-path`.
5252
* Fix orphaned nrepl-messages buffer after `cider-quit`.
5353
* [#1782](https://github.com/clojure-emacs/cider/issues/1782): Disable mouse-over tooltips when `help-at-pt-display-when-idle` is non-nil.
54+
* [#1811](https://github.com/clojure-emacs/cider/issues/1811): Handle properly jack-in commands with spaces in them.
5455

5556
## 0.12.0 (2016-04-16)
5657

cider.el

Lines changed: 9 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -672,25 +672,25 @@ choose."
672672
"Find `cider-lein-command' on `exec-path' if possible, or return `nil'.
673673
674674
In 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
682682
In 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
690690
In 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

Comments
 (0)