From 061fd8a209bbcaffc2bfb850ac6046752a567d50 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 27 Jul 2021 03:51:10 -0400
Subject: Re-named wrap => in && unwrap => out.

---
 stdlib/source/program/aedifex/project.lux | 12 ++++++------
 1 file changed, 6 insertions(+), 6 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 d845ed689..9d3574bd1 100644
--- a/stdlib/source/program/aedifex/project.lux
+++ b/stdlib/source/program/aedifex/project.lux
@@ -57,19 +57,19 @@
     (case (list.find (set.member? lineage)
                      (get@ #//.parents profile))
       (#.Some ouroboros)
-      (exception.throw ..circular_dependency [ouroboros name])
+      (exception.except ..circular_dependency [ouroboros name])
       
       #.None
       (do {! try.monad}
         [parents (monad.map ! (profile' (set.add name lineage) project)
                             (get@ #//.parents profile))]
-        (wrap (list\fold (function (_ parent child)
-                           (\ //.monoid compose child parent))
-                         (set@ #//.parents (list) profile)
-                         parents))))
+        (in (list\fold (function (_ parent child)
+                         (\ //.monoid compose child parent))
+                       (set@ #//.parents (list) profile)
+                       parents))))
     
     #.None
-    (exception.throw ..unknown_profile [name])))
+    (exception.except ..unknown_profile [name])))
 
 (def: #export (profile name project)
   (-> Name Project (Try Profile))
-- 
cgit v1.2.3