From 54c0e9c7397908eeddf5fbed9b193e25648fb253 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 5 Sep 2021 03:25:28 -0400
Subject: De-taggification | part 3

---
 stdlib/source/program/aedifex/format.lux | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/format.lux b/stdlib/source/program/aedifex/format.lux
index af03bf827..f6b737fdf 100644
--- a/stdlib/source/program/aedifex/format.lux
+++ b/stdlib/source/program/aedifex/format.lux
@@ -27,10 +27,10 @@
        #url (~ (code.text url))
        #type (~ (case type
                   #/.Repo
-                  (' #repo)
+                  (' "repo")
 
                   #/.Manual
-                  (' #manual)))]))
+                  (' "manual")))]))
 
 (def: (organization [name url])
   (Format /.Organization)
@@ -60,7 +60,7 @@
   (Format Aggregate)
   (|>> dictionary.entries
        (list\each (function (_ [key value])
-                    (list (code.local_tag key) value)))
+                    (list (code.text key) value)))
        list\conjoint
        code.tuple))
 
@@ -141,7 +141,7 @@
   (` [(~ (code.text program))
       (~+ (list\each code.text parameters))]))
 
-(def: .public (profile value)
+(def: (profile value)
   (Format /.Profile)
   (`` (|> ..empty
           (..on_list "parents" (value@ #/.parents value) code.text)
-- 
cgit v1.2.3