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/program/aedifex/repository/remote.lux | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'stdlib/source/program/aedifex/repository')

diff --git a/stdlib/source/program/aedifex/repository/remote.lux b/stdlib/source/program/aedifex/repository/remote.lux
index feaf3201f..11d29716e 100644
--- a/stdlib/source/program/aedifex/repository/remote.lux
+++ b/stdlib/source/program/aedifex/repository/remote.lux
@@ -68,11 +68,11 @@
                                      http))]
       (case status
         (^ (static http/status.ok))
-        (\ ! map product.right ((get@ #@http.body message) #.None))
+        (\ ! map product.right ((value@ #@http.body message) #.None))
         
         _
         (do !
-          [_ ((get@ #@http.body message) (#.Some 0))]
+          [_ ((value@ #@http.body message) (#.Some 0))]
           (\ io.monad in (exception.except ..download_failure [(format address uri) status]))))))
 
   (def: (upload uri content)
@@ -88,7 +88,7 @@
                                                             ..base_headers)))
                                      (#.Some content)
                                      http))
-       _ ((get@ #@http.body message) (#.Some 0))]
+       _ ((value@ #@http.body message) (#.Some 0))]
       (case status
         (^ (static http/status.created))
         (in [])
-- 
cgit v1.2.3