From dda05bca0956af5e5b3875c4cc36e61aa04772e4 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 12 Sep 2021 00:07:08 -0400
Subject: Made the "#" character great again!

---
 stdlib/source/program/aedifex/project.lux | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/project.lux b/stdlib/source/program/aedifex/project.lux
index acf3c3819..aedae9c64 100644
--- a/stdlib/source/program/aedifex/project.lux
+++ b/stdlib/source/program/aedifex/project.lux
@@ -54,22 +54,22 @@
 (def: (profile' lineage project name)
   (-> (Set Name) Project Name (Try Profile))
   (case (dictionary.value name project)
-    {#.Some profile}
+    {.#Some profile}
     (case (list.example (set.member? lineage)
-                        (value@ #//.parents profile))
-      {#.Some ouroboros}
+                        (value@ //.#parents profile))
+      {.#Some ouroboros}
       (exception.except ..circular_dependency [ouroboros name])
       
-      #.None
+      {.#None}
       (do [! try.monad]
         [parents (monad.each ! (profile' (set.has name lineage) project)
-                             (value@ #//.parents profile))]
+                             (value@ //.#parents profile))]
         (in (list\mix (function (_ parent child)
                         (\ //.monoid composite child parent))
-                      (with@ #//.parents (list) profile)
+                      (with@ //.#parents (list) profile)
                       parents))))
     
-    #.None
+    {.#None}
     (exception.except ..unknown_profile [name])))
 
 (def: .public profile
-- 
cgit v1.2.3