From 9091fddc5284ac18804565334b5ebcd0f45a58e4 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Mon, 22 Aug 2011 16:24:02 -0400 Subject: [PATCH] Use (here-namespace) for autoloads, (not `hidden-namespace' which is more of a user workspace thing). --- collects/xrepl/xrepl.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/xrepl/xrepl.rkt b/collects/xrepl/xrepl.rkt index 1a01311cfc..aa716dab94 100644 --- a/collects/xrepl/xrepl.rkt +++ b/collects/xrepl/xrepl.rkt @@ -23,7 +23,7 @@ (define (autoloaded? sym) (hash-ref autoloaded-specs sym #f)) (define-syntax-rule (defautoload libspec id ...) (begin (define (id . args) - (set! id (parameterize ([current-namespace hidden-namespace]) + (set! id (parameterize ([current-namespace (here-namespace)]) (dynamic-require 'libspec 'id))) (hash-set! autoloaded-specs 'libspec #t) (hash-set! autoloaded-specs 'id #t)