branch: elpa/geiser-racket
commit a0532bce7370f1409ddcd9a04b12caa3a76ced73
Author: Jose Antonio Ortega Ruiz <[email protected]>
Commit: Jose Antonio Ortega Ruiz <[email protected]>
Quoting binary on version checks (issue #117)
We could probably be even more robust, but i am being a bit lazy
instead.
---
elisp/geiser-racket.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/elisp/geiser-racket.el b/elisp/geiser-racket.el
index fbd08c7..ac7626a 100644
--- a/elisp/geiser-racket.el
+++ b/elisp/geiser-racket.el
@@ -364,7 +364,9 @@ using start-geiser, a procedure in the geiser/server
module."
(defun geiser-racket--version (binary)
(shell-command-to-string
- (format "%s -e %s" binary (shell-quote-argument "(display (version))"))))
+ (format "%s -e %s"
+ (shell-quote-argument binary)
+ (shell-quote-argument "(display (version))"))))
(defvar geiser-racket--image-cache-dir nil)
