Fix quoting for import.

janet-lang · Jun 16, 2024 · fda0a08 · fda0a08
1 parent 94b7a69
commit fda0a08
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/boot/boot.janet b/src/boot/boot.janet
@@ -3077,7 +3077,7 @@
   current environment.``
   [path & args]
   (def ps (partition 2 args))
-  (def argm (mapcat (fn [[k v]] [k (if (= k :as) (string v) v)]) ps))
+  (def argm (mapcat (fn [[k v]] [k (case k :as (string v) :only ~(quote ,v) v)]) ps))
   (tuple import* (string path) ;argm))
 
 (defmacro use