aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex
diff options
context:
space:
mode:
authorEduardo Julian2022-06-12 14:19:07 -0400
committerEduardo Julian2022-06-12 14:19:07 -0400
commit616ce8051f59f956fedc57780f5a8fefa16dd61d (patch)
treed0cf43811d8414730cd52fb0d509c7cbc7032cda /stdlib/source/test/aedifex
parent8c3a1afab9efeb86e2f53d743551fc689fbad257 (diff)
Re-named "partial_list" to "list.partial".
Diffstat (limited to 'stdlib/source/test/aedifex')
-rw-r--r--stdlib/source/test/aedifex/cache.lux5
-rw-r--r--stdlib/source/test/aedifex/cli.lux4
2 files changed, 5 insertions, 4 deletions
diff --git a/stdlib/source/test/aedifex/cache.lux b/stdlib/source/test/aedifex/cache.lux
index b9762e9ee..34173ce62 100644
--- a/stdlib/source/test/aedifex/cache.lux
+++ b/stdlib/source/test/aedifex/cache.lux
@@ -17,7 +17,8 @@
[xml (.only XML)]]
[collection
["[0]" set]
- ["[0]" dictionary]]]
+ ["[0]" dictionary]
+ ["[0]" list]]]
[math
["[0]" random (.only Random) (.open: "[1]#[0]" monad)]
[number
@@ -96,7 +97,7 @@
content ..content]
(in [dependency
(has //package.#origin {//repository/origin.#Remote ""} (//package.local pom content))])))))]
- (in (dictionary.of_list //dependency.hash (partial_list [main_dependency main_package] dependencies)))))
+ (in (dictionary.of_list //dependency.hash (list.partial [main_dependency main_package] dependencies)))))
(def: singular
Test
diff --git a/stdlib/source/test/aedifex/cli.lux b/stdlib/source/test/aedifex/cli.lux
index fe15d204e..f0b011180 100644
--- a/stdlib/source/test/aedifex/cli.lux
+++ b/stdlib/source/test/aedifex/cli.lux
@@ -66,7 +66,7 @@
{/.#Install} (list "install")
{/.#Deploy repository [user password]} (list "deploy" repository user password)
{/.#Compilation compilation} (..compilation_format compilation)
- {/.#Auto compilation} (partial_list "auto" (..compilation_format compilation))))
+ {/.#Auto compilation} (list.partial "auto" (..compilation_format compilation))))
(def: without_profile
Test
@@ -92,7 +92,7 @@
(_.property "With profile."
(|> expected_command
..format
- (partial_list "with" expected_profile)
+ (list.partial "with" expected_profile)
(cli.result /.command)
(pipe.case
{try.#Success [actual_profile actual_command]}