From e00ba096c8837abe85d366e0c1293c09dbe84d81 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 18 Aug 2021 03:29:15 -0400
Subject: Some bug fixes.

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

(limited to 'stdlib/source/test/aedifex/parser.lux')

diff --git a/stdlib/source/test/aedifex/parser.lux b/stdlib/source/test/aedifex/parser.lux
index 152123d55..6f1516258 100644
--- a/stdlib/source/test/aedifex/parser.lux
+++ b/stdlib/source/test/aedifex/parser.lux
@@ -55,16 +55,16 @@
 
 (def: with_default_sources
   (-> //.Profile //.Profile)
-  (update@ #//.sources
-           (: (-> (Set //.Source) (Set //.Source))
-              (function (_ sources)
-                (if (set.empty? sources)
-                  (set.of_list text.hash (list //.default_source))
-                  sources)))))
+  (revised@ #//.sources
+            (: (-> (Set //.Source) (Set //.Source))
+               (function (_ sources)
+                 (if (set.empty? sources)
+                   (set.of_list text.hash (list //.default_source))
+                   sources)))))
 
 (def: with_default_repository
   (-> //.Profile //.Profile)
-  (update@ #//.repositories (set.has //.default_repository)))
+  (revised@ #//.repositories (set.has //.default_repository)))
 
 (def: single_profile
   Test
-- 
cgit v1.2.3