Re-named wrap => in && unwrap => out.

1 files changed, 6 insertions, 6 deletions

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))