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.

---
 stdlib/source/program/aedifex/pom.lux | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

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

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