From 41495e32d3f5f88b5f189f48dd4fdbfa883c6ac0 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 14 Mar 2022 18:27:37 -0400
Subject: De-sigil-ification: >

---
 stdlib/source/program/aedifex/pom.lux | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/pom.lux b/stdlib/source/program/aedifex/pom.lux
index ccb7f11ac..323afbb80 100644
--- a/stdlib/source/program/aedifex/pom.lux
+++ b/stdlib/source/program/aedifex/pom.lux
@@ -4,7 +4,7 @@
    [abstract
     [monad {"+" do}]]
    [control
-    [pipe {"+" case>}]
+    ["[0]" pipe]
     ["[0]" maybe ("[1]#[0]" functor)]
     ["[0]" try {"+" Try}]
     ["[0]" exception]
@@ -65,8 +65,9 @@
 
 (def: distribution
   (-> /.Distribution XML)
-  (|>> (case> {/.#Repo} "repo"
-              {/.#Manual} "manual")
+  (|>> (pipe.case
+         {/.#Repo} "repo"
+         {/.#Manual} "manual")
        (..property "distribution")))
 
 (def: (license [name url distribution])
-- 
cgit v1.2.3