diff --git a/src/boot/boot.janet b/src/boot/boot.janet index b0c283a6..be477e99 100644 --- a/src/boot/boot.janet +++ b/src/boot/boot.janet @@ -2131,7 +2131,10 @@ :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)))