From bf53ee92fc3c33a4885aa227e55d24f7ba3cb2c4 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 16 Mar 2022 08:37:23 -0400
Subject: De-sigil-ification: prefix :

---
 stdlib/source/program/aedifex/dependency/deployment.lux | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/dependency/deployment.lux b/stdlib/source/program/aedifex/dependency/deployment.lux
index f55520ec1..735ec1ebd 100644
--- a/stdlib/source/program/aedifex/dependency/deployment.lux
+++ b/stdlib/source/program/aedifex/dependency/deployment.lux
@@ -44,12 +44,12 @@
   (-> (Repository Async) ///artifact.Version Dependency [Binary Status] (Async (Try Any)))
   (let [artifact (format (///artifact.uri version_template artifact)
                          (///artifact/extension.extension type))
-        deploy_hash (: (All (_ h) (-> (Codec Text (Hash h)) Extension (Hash h) (Async (Try Any))))
-                       (function (_ codec extension hash)
-                         (|> hash
-                             (# codec encoded)
-                             (# utf8.codec encoded)
-                             (# repository upload (format artifact extension)))))]
+        deploy_hash (is (All (_ h) (-> (Codec Text (Hash h)) Extension (Hash h) (Async (Try Any))))
+                        (function (_ codec extension hash)
+                          (|> hash
+                              (# codec encoded)
+                              (# utf8.codec encoded)
+                              (# repository upload (format artifact extension)))))]
     (do [! (try.with async.monad)]
       [_ (# repository upload artifact data)]
       (case status
@@ -89,8 +89,8 @@
 (def: (update_snapshot [artifact type] now snapshot)
   (-> Dependency Instant Metadata (Try Metadata))
   (do try.monad
-    [now (: (Try ///artifact/time.Time)
-            (///artifact/time.of_instant now))
+    [now (is (Try ///artifact/time.Time)
+             (///artifact/time.of_instant now))
      .let [version_template (the ///artifact.#version artifact)
            snapshot (|> snapshot
                         (revised [///metadata/snapshot.#versioning ///artifact/versioning.#snapshot]
-- 
cgit v1.2.3