diff options
-rw-r--r-- | stdlib/source/lux.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux index a225683e0..8ff78e0a1 100644 --- a/stdlib/source/lux.lux +++ b/stdlib/source/lux.lux @@ -4049,15 +4049,15 @@ #import-refer {#refer-defs referral #refer-open openings}}))) - (^ [_ (#Tuple (list& [_ (#Symbol "" m-name)] extra))]) + (^ [_ (#Tuple (list& [_ (#Symbol "" raw-m-name)] extra))]) (do Monad<Lux> - [m-name (clean-module m-name) + [m-name (clean-module raw-m-name) referral+extra (parse-short-referrals extra) #let [[referral extra] referral+extra] openings+extra (parse-short-openings extra) #let [[openings extra] openings+extra]] (wrap (list {#import-name m-name - #import-alias (#;Some m-name) + #import-alias (#;Some raw-m-name) #import-refer {#refer-defs referral #refer-open openings}}))) |