diff options
Diffstat (limited to 'elisp/geiser-chicken.el')
| -rw-r--r-- | elisp/geiser-chicken.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/elisp/geiser-chicken.el b/elisp/geiser-chicken.el index 8c10908..60567b7 100644 --- a/elisp/geiser-chicken.el +++ b/elisp/geiser-chicken.el @@ -263,10 +263,7 @@ This function uses `geiser-chicken-init-file' if it exists." (defconst geiser-chicken-minimum-version "4.8.0.0") (defun geiser-chicken--version (binary) - (shell-command-to-string - (format "%s -e %s" - (shell-quote-argument binary) - (shell-quote-argument "(display (chicken-version))")))) + (car (process-lines binary "-e" "(display (chicken-version))"))) (defun connect-to-chicken () "Start a Chicken REPL connected to a remote process." |