summaryrefslogtreecommitdiff
path: root/elisp/geiser-racket.el
diff options
context:
space:
mode:
Diffstat (limited to 'elisp/geiser-racket.el')
-rw-r--r--elisp/geiser-racket.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/elisp/geiser-racket.el b/elisp/geiser-racket.el
index 690f71a..65e5e36 100644
--- a/elisp/geiser-racket.el
+++ b/elisp/geiser-racket.el
@@ -202,11 +202,11 @@ using start-geiser, a procedure in the geiser/server module."
;;; External help
(defsubst geiser-racket--get-help (symbol module)
- (geiser-eval--send/wait `(:scm ,(format ",help %s %S" symbol module))))
+ (geiser-eval--send/wait `(:scm ,(format ",help %s %s" symbol module))))
(defun geiser-racket--external-help (id module)
(message "Looking up manual for '%s'..." id)
- (let* ((ret (geiser-racket--get-help id module))
+ (let* ((ret (geiser-racket--get-help id (format "%S" module)))
(out (geiser-eval--retort-output ret))
(ret (if (and out (string-match " but provided by:\n +\\(.+\\)\n" out))
(geiser-racket--get-help id (match-string 1 out))