From 689f2dcbb47d8feb3471b01ad7ee4f2ce775c9b4 Mon Sep 17 00:00:00 2001 From: Calvin Rose Date: Fri, 24 Jan 2020 16:54:06 -0600 Subject: [PATCH] Change default import prefix. Changed from `(string path "/")` to `(string (last (string/split "/" path)) "/)`. --- src/boot/boot.janet | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) 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)))