summaryrefslogtreecommitdiff
path: root/scheme/racket/geiser
diff options
context:
space:
mode:
Diffstat (limited to 'scheme/racket/geiser')
-rw-r--r--scheme/racket/geiser/autodoc.rkt6
1 files changed, 4 insertions, 2 deletions
diff --git a/scheme/racket/geiser/autodoc.rkt b/scheme/racket/geiser/autodoc.rkt
index 021a5fd..08455e5 100644
--- a/scheme/racket/geiser/autodoc.rkt
+++ b/scheme/racket/geiser/autodoc.rkt
@@ -22,11 +22,13 @@
geiser/modules
geiser/locations)
+(define here (current-namespace))
+
(define (get-help symbol mod)
(if (eq? symbol mod)
(get-mod-help mod)
- (with-handlers ([exn? (lambda (_) (eval `(help ,symbol)))])
- (eval `(help ,symbol #:from ,(ensure-module-spec mod))))))
+ (with-handlers ([exn? (lambda (_) (eval `(help ,symbol) here))])
+ (eval `(help ,symbol #:from ,(ensure-module-spec mod)) here))))
(define (get-mod-help mod)
(let-values ([(ids syns) (module-identifiers mod)])