branch: elpa/geiser-guile
commit f5fee3bddd264d84b2c40614053cef83ca072352
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-guile.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el
index 697a045..c4f6293 100644
--- a/elisp/geiser-guile.el
+++ b/elisp/geiser-guile.el
@@ -336,7 +336,9 @@ This function uses `geiser-guile-init-file' if it exists."
(defun geiser-guile--version (binary)
(shell-command-to-string
- (format "%s -c %s" binary (shell-quote-argument "(display (version))"))))
+ (format "%s -c %s"
+ (shell-quote-argument binary)
+ (shell-quote-argument "(display (version))"))))
(defun geiser-guile-update-warning-level ()
"Update the warning level used by the REPL.
