Change default import prefix.
Changed from `(string path "/")` to
`(string (last (string/split "/" path)) "/)`.
:prefix prefix
:export ep} (table ;args))
(def newenv (require path ;args))
- (def prefix (or (and as (string as "/")) prefix (string path "/")))
+ (def prefix (or
+ (and as (string as "/"))
+ prefix
+ (string (last (string/split "/" path)) "/")))
(loop [[k v] :pairs newenv :when (symbol? k) :when (not (v :private))]
(def newv (table/setproto @{:private (not ep)} v))
(put env (symbol prefix k) newv)))
