|
|
@ -45,9 +45,7 @@
|
|
|
|
(hash-ref ram-cache-record subkey)]
|
|
|
|
(hash-ref ram-cache-record subkey)]
|
|
|
|
[else
|
|
|
|
[else
|
|
|
|
(parameterize ([current-namespace (make-base-namespace)])
|
|
|
|
(parameterize ([current-namespace (make-base-namespace)])
|
|
|
|
(namespace-attach-module
|
|
|
|
(namespace-attach-module (namespace-anchor->namespace cache-module-ns) 'pollen/setup) ; brings in currently instantiated params (unlike namespace-require)
|
|
|
|
(namespace-anchor->namespace cache-module-ns)
|
|
|
|
|
|
|
|
'pollen/setup) ; brings in currently instantiated params (unlike namespace-require)
|
|
|
|
|
|
|
|
(dynamic-require path subkey))]))))
|
|
|
|
(dynamic-require path subkey))]))))
|
|
|
|
|
|
|
|
|
|
|
|
(define+provide (cached-require path-string subkey)
|
|
|
|
(define+provide (cached-require path-string subkey)
|
|
|
|