From 93eb82e1bf6d2f2a6b3b0adb85f4ab93cbb766a9 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 14 Mar 2022 03:33:01 -0400
Subject: De-sigil-ification: @

---
 stdlib/source/program/aedifex/format.lux | 40 ++++++++++++++++----------------
 1 file changed, 20 insertions(+), 20 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 d0628f160..19800f4d9 100644
--- a/stdlib/source/program/aedifex/format.lux
+++ b/stdlib/source/program/aedifex/format.lux
@@ -115,13 +115,13 @@
 (def: (info value)
   (Format /.Info)
   (|> ..empty
-      (..on_maybe "url" (value@ /.#url value) code.text)
-      (..on_maybe "scm" (value@ /.#scm value) code.text)
-      (..on_maybe "description" (value@ /.#description value) code.text)
-      (..on_list "licenses" (value@ /.#licenses value) ..license)
-      (..on_maybe "organization" (value@ /.#organization value) ..organization)
-      (..on_list "developers" (value@ /.#developers value) ..developer)
-      (..on_list "contributors" (value@ /.#contributors value) ..contributor)
+      (..on_maybe "url" (the /.#url value) code.text)
+      (..on_maybe "scm" (the /.#scm value) code.text)
+      (..on_maybe "description" (the /.#description value) code.text)
+      (..on_list "licenses" (the /.#licenses value) ..license)
+      (..on_maybe "organization" (the /.#organization value) ..organization)
+      (..on_list "developers" (the /.#developers value) ..developer)
+      (..on_list "contributors" (the /.#contributors value) ..contributor)
       ..aggregate))
 
 (def: (artifact' [group name version])
@@ -157,20 +157,20 @@
 (def: (profile value)
   (Format /.Profile)
   (`` (|> ..empty
-          (..on_list "parents" (value@ /.#parents value) code.text)
-          (..on_maybe "identity" (value@ /.#identity value) ..artifact)
-          (..on_maybe "info" (value@ /.#info value) ..info)
-          (..on_set "repositories" (value@ /.#repositories value) code.text)
-          (..on_set "dependencies" (value@ /.#dependencies value) ..dependency)
-          (dictionary.has ..lux_compiler_label (..dependency (value@ /.#lux value)))
-          (..on_list "compilers" (value@ /.#compilers value) ..compiler)
-          (..on_set "sources" (value@ /.#sources value) code.text)
-          (dictionary.has "target" (code.text (value@ /.#target value)))
-          (..on_maybe "program" (value@ /.#program value) code.text)
-          (..on_maybe "test" (value@ /.#test value) code.text)
-          (..on_dictionary "deploy_repositories" (value@ /.#deploy_repositories value) code.text code.text)
+          (..on_list "parents" (the /.#parents value) code.text)
+          (..on_maybe "identity" (the /.#identity value) ..artifact)
+          (..on_maybe "info" (the /.#info value) ..info)
+          (..on_set "repositories" (the /.#repositories value) code.text)
+          (..on_set "dependencies" (the /.#dependencies value) ..dependency)
+          (dictionary.has ..lux_compiler_label (..dependency (the /.#lux value)))
+          (..on_list "compilers" (the /.#compilers value) ..compiler)
+          (..on_set "sources" (the /.#sources value) code.text)
+          (dictionary.has "target" (code.text (the /.#target value)))
+          (..on_maybe "program" (the /.#program value) code.text)
+          (..on_maybe "test" (the /.#test value) code.text)
+          (..on_dictionary "deploy_repositories" (the /.#deploy_repositories value) code.text code.text)
           (~~ (template [<tag>]
-                [(dictionary.has (template.text [<tag>]) (..runtime (value@ <tag> value)))]
+                [(dictionary.has (template.text [<tag>]) (..runtime (the <tag> value)))]
 
                 [/.#java]
                 [/.#js]
-- 
cgit v1.2.3