From 065e8a4d8122d4616b570496915d2c0e2c78cd6b Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 11 Aug 2022 04:15:07 -0400
Subject: Re-named the "case" macro to "when".

---
 stdlib/source/test/aedifex/pom.lux | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/stdlib/source/test/aedifex/pom.lux b/stdlib/source/test/aedifex/pom.lux
index c6283f30d..0484599e0 100644
--- a/stdlib/source/test/aedifex/pom.lux
+++ b/stdlib/source/test/aedifex/pom.lux
@@ -34,11 +34,11 @@
            (do random.monad
              [expected @profile.random]
              (_.coverage [/.write /.parser]
-               (case [(/.write expected)
+               (when [(/.write expected)
                       (the //.#identity expected)]
                  [{try.#Success pom}
                   {.#Some _}]
-                 (case (<xml>.result /.parser (list pom))
+                 (when (<xml>.result /.parser (list pom))
                    {try.#Success actual}
                    (at //.equivalence =
                        (|> (at //.monoid identity)
-- 
cgit v1.2.3