diff options
Diffstat (limited to 'scheme')
| -rw-r--r-- | scheme/plt/geiser/modules.ss | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scheme/plt/geiser/modules.ss b/scheme/plt/geiser/modules.ss index 3bed19e..9ccb421 100644 --- a/scheme/plt/geiser/modules.ss +++ b/scheme/plt/geiser/modules.ss @@ -63,7 +63,7 @@ (define (module-spec->path-name spec) (with-handlers ((exn? (lambda (_) #f))) (let ((ns (module->namespace (ensure-module-spec spec)))) - (namespace->module-path-name (eval '(current-namespace) ns))))) + (namespace->module-path-name ns)))) (define (module-path-name->name path) (cond ((path? path) |