From 9f039e8a0a09e0278547d697efa018cd3fd68672 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 30 Jul 2021 01:12:05 -0400
Subject: More renamings.

---
 stdlib/source/test/aedifex/dependency/deployment.lux | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'stdlib/source/test/aedifex/dependency/deployment.lux')

diff --git a/stdlib/source/test/aedifex/dependency/deployment.lux b/stdlib/source/test/aedifex/dependency/deployment.lux
index 3688e56aa..e62e7b2e4 100644
--- a/stdlib/source/test/aedifex/dependency/deployment.lux
+++ b/stdlib/source/test/aedifex/dependency/deployment.lux
@@ -107,7 +107,7 @@
         (and (|> cache
                  (dictionary.get library_url)
                  (maybe\map (binary\= expected_library))
-                 (maybe.default false))
+                 (maybe.else false))
              (dictionary.key? cache (format library_url artifact/extension.sha-1))
              (dictionary.key? cache (format library_url artifact/extension.md5)))
 
@@ -115,7 +115,7 @@
         (and (|> cache
                  (dictionary.get pom_url)
                  (maybe\map (binary\= expected_pom))
-                 (maybe.default false))
+                 (maybe.else false))
              (dictionary.key? cache (format pom_url artifact/extension.sha-1))
              (dictionary.key? cache (format pom_url artifact/extension.md5)))
 
@@ -162,7 +162,7 @@
                     (_.cover' [/.one]
                               (|> ?outcome
                                   (try\map (verify_one 1 address package cache expected_artifact))
-                                  (try.default false))))))
+                                  (try.else false))))))
             (do {! random.monad}
               [#let [hash (: (Hash [Dependency Artifact Package])
                              (\ hash.functor map (|>> product.right product.left product.left)
@@ -200,5 +200,5 @@
                                                                 bundles)]
                                                (and expected_deployments!
                                                     every_deployment_was_correct!))))
-                                  (try.default false))))))
+                                  (try.else false))))))
             ))))
-- 
cgit v1.2.3