aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/specification/aedifex/repository.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/specification/aedifex/repository.lux')
-rw-r--r--stdlib/source/specification/aedifex/repository.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/specification/aedifex/repository.lux b/stdlib/source/specification/aedifex/repository.lux
index f5f278e7c..3d8b90459 100644
--- a/stdlib/source/specification/aedifex/repository.lux
+++ b/stdlib/source/specification/aedifex/repository.lux
@@ -40,7 +40,7 @@
bad_download! (at subject download bad_uri)]
(unit.coverage [/.Repository]
(let [successfull_flow!
- (case [good_upload! good_download!]
+ (when [good_upload! good_download!]
[{try.#Success _} {try.#Success actual}]
(at binary.equivalence = expected actual)
@@ -48,7 +48,7 @@
false)
failed_flow!
- (case [bad_upload! bad_download!]
+ (when [bad_upload! bad_download!]
[{try.#Failure _} {try.#Failure _}]
true