From e00e0b5f1e5fb509cf8f32424397110f524b8148 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 16 Jun 2022 02:16:07 -0400
Subject: New "parser" hierarchy. [Part 3]

---
 stdlib/source/program/aedifex/artifact/snapshot.lux | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/artifact/snapshot.lux b/stdlib/source/program/aedifex/artifact/snapshot.lux
index 4966eb80f..45b54e2cd 100644
--- a/stdlib/source/program/aedifex/artifact/snapshot.lux
+++ b/stdlib/source/program/aedifex/artifact/snapshot.lux
@@ -5,14 +5,14 @@
     [equivalence (.only Equivalence)]
     [monad (.only do)]]
    [control
-    ["<>" parser (.only)
-     ["<[0]>" xml (.only Parser)]]]
+    ["<>" parser]]
    [data
     ["[0]" sum]
     ["[0]" text
      ["<[1]>" \\parser]]
     [format
-     ["[0]" xml (.only XML)]]]]]
+     ["[0]" xml (.only XML)
+      ["<[1]>" \\parser (.only Parser)]]]]]]
  ["[0]" /
   ["[1][0]" stamp (.only Stamp)]])
 
-- 
cgit v1.2.3