aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/input.lux
diff options
context:
space:
mode:
authorEduardo Julian2020-12-25 09:22:38 -0400
committerEduardo Julian2020-12-25 09:22:38 -0400
commit4ca397765805eda5ddee393901ed3a02001a960a (patch)
tree2ab184a1a4e244f3a69e86c8a7bb3ad49c22b4a3 /stdlib/source/test/aedifex/input.lux
parentd29e091e98dabb8dfcf816899ada480ecbf7e357 (diff)
Replaced kebab-case with snake_case for naming convention.
Diffstat (limited to 'stdlib/source/test/aedifex/input.lux')
-rw-r--r--stdlib/source/test/aedifex/input.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/test/aedifex/input.lux b/stdlib/source/test/aedifex/input.lux
index a0db21ba6..e2751381a 100644
--- a/stdlib/source/test/aedifex/input.lux
+++ b/stdlib/source/test/aedifex/input.lux
@@ -30,10 +30,10 @@
["#." action]
["#." format]]]})
-(def: (with-default-source sources)
+(def: (with_default_source sources)
(-> (Set //.Source) (Set //.Source))
(if (set.empty? sources)
- (set.add //.default-source sources)
+ (set.add //.default_source sources)
sources))
(def: #export test
@@ -46,16 +46,16 @@
(wrap (do promise.monad
[verdict (do //action.monad
[file (: (Promise (Try (File Promise)))
- (file.get-file promise.monad fs //project.file))
+ (file.get_file promise.monad fs //project.file))
_ (|> expected
//format.profile
%.code
(\ encoding.utf8 encode)
- (!.use (\ file over-write)))
+ (!.use (\ file over_write)))
actual (: (Promise (Try Profile))
(/.read promise.monad fs //.default))]
(wrap (\ //.equivalence =
- (update@ #//.sources ..with-default-source expected)
+ (update@ #//.sources ..with_default_source expected)
actual)))]
(_.cover' [/.read]
(try.default false verdict)))))))