From f71ec9cb4ead1e7f9573a37686c87e6a9206a415 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 10 Sep 2021 02:27:34 -0400
Subject: Fixed the indentation of variants.

---
 .../source/program/aedifex/artifact/snapshot.lux   |  4 ++--
 .../source/program/aedifex/metadata/artifact.lux   | 14 ++++++-------
 .../source/program/aedifex/metadata/snapshot.lux   | 10 ++++-----
 stdlib/source/program/aedifex/package.lux          |  4 ++--
 stdlib/source/program/aedifex/pom.lux              | 24 +++++++++++-----------
 5 files changed, 28 insertions(+), 28 deletions(-)

(limited to 'stdlib/source/program/aedifex')

diff --git a/stdlib/source/program/aedifex/artifact/snapshot.lux b/stdlib/source/program/aedifex/artifact/snapshot.lux
index 64ff5d7b7..5ac1e126a 100644
--- a/stdlib/source/program/aedifex/artifact/snapshot.lux
+++ b/stdlib/source/program/aedifex/artifact/snapshot.lux
@@ -46,8 +46,8 @@
 (def: local_copy_format
   XML
   {#xml.Node <local_copy>
-   xml.attributes
-   (list {#xml.Text ..local_copy_value})})
+             xml.attributes
+             (list {#xml.Text ..local_copy_value})})
 
 (def: local_copy_parser
   (Parser Any)
diff --git a/stdlib/source/program/aedifex/metadata/artifact.lux b/stdlib/source/program/aedifex/metadata/artifact.lux
index b56c66104..d0bdf887e 100644
--- a/stdlib/source/program/aedifex/metadata/artifact.lux
+++ b/stdlib/source/program/aedifex/metadata/artifact.lux
@@ -99,13 +99,13 @@
 (def: .public (format value)
   (-> Metadata XML)
   {#xml.Node ..<metadata>
-   xml.attributes
-   (list (..group_format (value@ #group value))
-         (..name_format (value@ #name value))
-         {#xml.Node ..<versioning>
-          xml.attributes
-          (list (..versions_format (value@ #versions value))
-                (..last_updated_format (value@ #last_updated value)))})})
+             xml.attributes
+             (list (..group_format (value@ #group value))
+                   (..name_format (value@ #name value))
+                   {#xml.Node ..<versioning>
+                              xml.attributes
+                              (list (..versions_format (value@ #versions value))
+                                    (..last_updated_format (value@ #last_updated value)))})})
 
 (def: (text tag)
   (-> xml.Tag (Parser Text))
diff --git a/stdlib/source/program/aedifex/metadata/snapshot.lux b/stdlib/source/program/aedifex/metadata/snapshot.lux
index 58792b042..05a065c6f 100644
--- a/stdlib/source/program/aedifex/metadata/snapshot.lux
+++ b/stdlib/source/program/aedifex/metadata/snapshot.lux
@@ -73,11 +73,11 @@
   (-> Metadata XML)
   (let [(^slots [#///artifact.group #///artifact.name #///artifact.version]) artifact]
     {#xml.Node ..<metadata>
-     xml.attributes
-     (list (..group_format group)
-           (..name_format name)
-           (..version_format version)
-           (///artifact/versioning.format versioning))}))
+               xml.attributes
+               (list (..group_format group)
+                     (..name_format name)
+                     (..version_format version)
+                     (///artifact/versioning.format versioning))}))
 
 (def: (text tag)
   (-> xml.Tag (Parser Text))
diff --git a/stdlib/source/program/aedifex/package.lux b/stdlib/source/program/aedifex/package.lux
index 62757c9b0..923c69cbc 100644
--- a/stdlib/source/program/aedifex/package.lux
+++ b/stdlib/source/program/aedifex/package.lux
@@ -53,12 +53,12 @@
   [#origin {#//origin.Local ""}
    #library [library
              {#//status.Verified (//hash.sha-1 library)
-              (//hash.md5 library)}]
+                                 (//hash.md5 library)}]
    #pom (let [binary_pom (|> pom (\ xml.codec encoded) (\ utf8.codec encoded))]
           [pom
            binary_pom
            {#//status.Verified (//hash.sha-1 binary_pom)
-            (//hash.md5 binary_pom)}])])
+                               (//hash.md5 binary_pom)}])])
 
 (def: .public dependencies
   (-> Package (Try (Set Dependency)))
diff --git a/stdlib/source/program/aedifex/pom.lux b/stdlib/source/program/aedifex/pom.lux
index 49e3793fe..e98730532 100644
--- a/stdlib/source/program/aedifex/pom.lux
+++ b/stdlib/source/program/aedifex/pom.lux
@@ -48,13 +48,13 @@
 (def: version
   XML
   {#_.Node ["" "modelVersion"] _.attributes
-   (list {#_.Text "4.0.0"})})
+           (list {#_.Text "4.0.0"})})
 
 (def: (property tag value)
   (-> Text Text XML)
   {#_.Node ["" tag]
-   _.attributes
-   (list {#_.Text value})})
+           _.attributes
+           (list {#_.Text value})})
 
 (def: (artifact value)
   (-> Artifact (List XML))
@@ -84,9 +84,9 @@
 (def: (dependency value)
   (-> Dependency XML)
   {#_.Node ["" ..dependency_tag]
-   _.attributes
-   (list\composite (..artifact (value@ #//dependency.artifact value))
-                   (list (..property "type" (value@ #//dependency.type value))))})
+           _.attributes
+           (list\composite (..artifact (value@ #//dependency.artifact value))
+                           (list (..property "type" (value@ #//dependency.type value))))})
 
 (def: (group tag)
   (-> Text (-> (List XML) XML))
@@ -144,12 +144,12 @@
     {#.Some identity}
     {#try.Success
      {#_.Node ["" ..project_tag] _.attributes
-      ($_ list\composite
-          (list ..version)
-          (..artifact identity)
-          (|> value (value@ #/.repositories) set.list (list\each ..repository) (..group "repositories") list)
-          (|> value (value@ #/.dependencies) set.list (list\each ..dependency) (..group ..dependencies_tag) list)
-          )}}
+              ($_ list\composite
+                  (list ..version)
+                  (..artifact identity)
+                  (|> value (value@ #/.repositories) set.list (list\each ..repository) (..group "repositories") list)
+                  (|> value (value@ #/.dependencies) set.list (list\each ..dependency) (..group ..dependencies_tag) list)
+                  )}}
 
     _
     (exception.except /.no_identity [])))
-- 
cgit v1.2.3