From 04c7f49a732380a2b9f72b1b937171b341c24323 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 9 Apr 2022 03:03:46 -0400
Subject: Better names for testing macros (plus better indentation).

---
 stdlib/source/test/aedifex/metadata.lux | 42 ++++++++++++++++-----------------
 1 file changed, 21 insertions(+), 21 deletions(-)

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

diff --git a/stdlib/source/test/aedifex/metadata.lux b/stdlib/source/test/aedifex/metadata.lux
index 5ff5988ee..20c67f929 100644
--- a/stdlib/source/test/aedifex/metadata.lux
+++ b/stdlib/source/test/aedifex/metadata.lux
@@ -23,27 +23,27 @@
            (do random.monad
              [sample $artifact.random]
              (all _.and
-                  (_.cover [/.remote_artifact_uri /.remote_project_uri]
-                           (not (text#= (/.remote_artifact_uri sample)
-                                        (/.remote_project_uri sample))))
-                  (_.cover [/.local_uri]
-                           (let [remote_artifact_uri (/.remote_artifact_uri sample)
-                                 remote_project_uri (/.remote_project_uri sample)]
-                             (and (not (text#= remote_artifact_uri (/.local_uri remote_artifact_uri)))
-                                  (not (text#= remote_project_uri (/.local_uri remote_project_uri))))))
-                  (_.cover [/.remote_uri]
-                           (let [remote_artifact_uri (/.remote_artifact_uri sample)
-                                 remote_project_uri (/.remote_project_uri sample)]
-                             (and (text#= remote_artifact_uri (/.remote_uri remote_artifact_uri))
-                                  (text#= remote_project_uri (/.remote_uri remote_project_uri))
-                                  (|> remote_artifact_uri
-                                      /.local_uri
-                                      /.remote_uri
-                                      (text#= remote_artifact_uri))
-                                  (|> remote_project_uri
-                                      /.local_uri
-                                      /.remote_uri
-                                      (text#= remote_project_uri)))))
+                  (_.coverage [/.remote_artifact_uri /.remote_project_uri]
+                    (not (text#= (/.remote_artifact_uri sample)
+                                 (/.remote_project_uri sample))))
+                  (_.coverage [/.local_uri]
+                    (let [remote_artifact_uri (/.remote_artifact_uri sample)
+                          remote_project_uri (/.remote_project_uri sample)]
+                      (and (not (text#= remote_artifact_uri (/.local_uri remote_artifact_uri)))
+                           (not (text#= remote_project_uri (/.local_uri remote_project_uri))))))
+                  (_.coverage [/.remote_uri]
+                    (let [remote_artifact_uri (/.remote_artifact_uri sample)
+                          remote_project_uri (/.remote_project_uri sample)]
+                      (and (text#= remote_artifact_uri (/.remote_uri remote_artifact_uri))
+                           (text#= remote_project_uri (/.remote_uri remote_project_uri))
+                           (|> remote_artifact_uri
+                               /.local_uri
+                               /.remote_uri
+                               (text#= remote_artifact_uri))
+                           (|> remote_project_uri
+                               /.local_uri
+                               /.remote_uri
+                               (text#= remote_project_uri)))))
                   ))
            
            /artifact.test
-- 
cgit v1.2.3