branch: elpa/geiser-racket
commit a0532bce7370f1409ddcd9a04b12caa3a76ced73
Author: Jose Antonio Ortega Ruiz <j...@gnu.org>
Commit: Jose Antonio Ortega Ruiz <j...@gnu.org>

    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)
 

Reply via email to