From 9e2f1e76f2c8df01ed7687d934c3210fcf676bd6 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 16 Jun 2022 00:48:19 -0400
Subject: De-sigil-ification: suffix : [Part 13]

---
 .../program/aedifex/command/deploy/release.lux       | 20 ++++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

(limited to 'stdlib/source/program/aedifex/command/deploy/release.lux')

diff --git a/stdlib/source/program/aedifex/command/deploy/release.lux b/stdlib/source/program/aedifex/command/deploy/release.lux
index 667bbf1ee..b709680ad 100644
--- a/stdlib/source/program/aedifex/command/deploy/release.lux
+++ b/stdlib/source/program/aedifex/command/deploy/release.lux
@@ -67,13 +67,13 @@
   "[1]::[0]"
   ("static" getProperty [java/lang/String] "io" "try" java/lang/String))
 
-(def: windows?
+(def windows?
   (IO (Try Bit))
   (at (try.with io.monad) each
       (|>> java/lang/String::toLowerCase ffi.of_string (text.starts_with? "windows"))
       (java/lang/System::getProperty (ffi.as_string "os.name"))))
 
-(def: dummy_jar
+(def dummy_jar
   Binary
   (|> (packager.package (context.jvm "")
                         (dictionary.empty text.hash)
@@ -88,7 +88,7 @@
         (undefined))))
 
 (with_template [<name> <extension>]
-  [(def: <name>
+  [(def <name>
      (-> Text Text)
      (text.suffix <extension>))]
 
@@ -100,7 +100,7 @@
   )
 
 (with_template [<name> <suffix>]
-  [(def: <name>
+  [(def <name>
      (-> Text Text)
      (|>> (text.suffix <suffix>) ..jar))]
 
@@ -108,11 +108,11 @@
   [sources "-sources"]
   )
 
-(def: .public release?
+(def .public release?
   (Predicate Artifact)
   (|>> //snapshot.snapshot? not))
 
-(def: (install_dummies! program local fs artifact)
+(def (install_dummies! program local fs artifact)
   (-> (Program Async) (Repository Async) (file.System Async) Artifact (Async (Try Any)))
   (do (try.with async.monad)
     [.let [$artifact (////artifact.uri (the ////artifact.#version artifact) artifact)]
@@ -121,18 +121,18 @@
      _ (at local upload (..sources $artifact) ..dummy_jar)]
     (in [])))
 
-(def: (signed it)
+(def (signed it)
   (-> Text [Text Text])
   [it (..asc it)])
 
-(def: (release_unsigned_artifact! local remote uri)
+(def (release_unsigned_artifact! local remote uri)
   (-> (Repository Async) (Repository Async) Text (Async (Try Binary)))
   (do [! ////action.monad]
     [it (at local download uri)
      _ (at remote upload uri it)]
     (in it)))
 
-(def: (release_signed_artifact! local remote [artifact signature])
+(def (release_signed_artifact! local remote [artifact signature])
   (-> (Repository Async) (Repository Async) [Text Text] (Async (Try Any)))
   (do [! ////action.monad]
     [it (..release_unsigned_artifact! local remote artifact)
@@ -144,7 +144,7 @@
      _ (..release_unsigned_artifact! local remote signature)]
     (in [])))
 
-(def: .public (do! program shell console local remote fs artifact profile)
+(def .public (do! program shell console local remote fs artifact profile)
   (-> (Program Async) (Shell Async) (Console Async) (Repository Async) (Repository Async) (file.System Async) Artifact (Command Any))
   (do [! ////action.monad]
     [_ (///install.do! console fs local profile)
-- 
cgit v1.2.3