mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-11-09 18:29:55 +00:00
Code Issues 1 Releases Wiki Activity

Fix quoting for import.

Browse Source
This commit is contained in:
Calvin Rose 2024-06-16 10:57:14 -05:00
parent 94b7a69741
commit fda0a081f5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/boot/boot.janet
View File

@ -3077,7 +3077,7 @@
current environment.`` current environment.``
[path & args] [path & args]
(def ps (partition 2 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)) (tuple import* (string path) ;argm))
(defmacro use (defmacro use