From cd71a864ad5be13ed6ec6d046e0a2cb1087bdf94 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 10 Sep 2021 01:21:23 -0400
Subject: Migrated variants to the new syntax.

---
 stdlib/source/test/aedifex/pom.lux | 10 +++++-----
 1 file changed, 5 insertions(+), 5 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 92f13bd4f..4913df25d 100644
--- a/stdlib/source/test/aedifex/pom.lux
+++ b/stdlib/source/test/aedifex/pom.lux
@@ -35,20 +35,20 @@
             (_.cover [/.write /.parser]
                      (case [(/.write expected)
                             (value@ #//.identity expected)]
-                       [(#try.Success pom)
-                        (#.Some _)]
+                       [{#try.Success pom}
+                        {#.Some _}]
                        (case (<xml>.result /.parser (list pom))
-                         (#try.Success actual)
+                         {#try.Success actual}
                          (\ //.equivalence =
                             (|> (\ //.monoid identity)
                                 (with@ #//.dependencies (value@ #//.dependencies expected))
                                 (with@ #//.repositories (value@ #//.repositories expected)))
                             actual)
 
-                         (#try.Failure error)
+                         {#try.Failure error}
                          false)
 
-                       [(#try.Failure error)
+                       [{#try.Failure error}
                         #.None]
                        (exception.match? //.no_identity error)
 
-- 
cgit v1.2.3