Re-named "::" and ":::" macros to "\" and "\\", to be consistent with the convention that only macros that deal with types may start with a colon.

1 files changed, 5 insertions, 5 deletions

diff --git a/stdlib/source/program/aedifex/command/install.lux b/stdlib/source/program/aedifex/command/install.lux
index 818283cc5..b152bc66c 100644
--- a/stdlib/source/program/aedifex/command/install.lux
+++ b/stdlib/source/program/aedifex/command/install.lux
@@ -39,7 +39,7 @@
   (do (try.with promise.monad)
     [file (: (Promise (Try (File Promise)))
              (file.get-file promise.monad system file))]
-    (!.use (:: file over-write) [content])))
+    (!.use (\ file over-write) [content])))
 
 (def: #export (do! system profile)
   (-> (file.System Promise) (Command Any))
@@ -49,14 +49,14 @@
       [package (export.library system (set.to-list (get@ #/.sources profile)))
        repository (: (Promise (Try Path))
                      (file.make-directories promise.monad system (///local.path system identity)))
-       #let [artifact-name (format repository (:: system separator) (///artifact.identity identity))]
+       #let [artifact-name (format repository (\ system separator) (///artifact.identity identity))]
        _ (..save! system (binary.run tar.writer package)
                   (format artifact-name ///artifact/extension.lux-library))
-       pom (:: promise.monad wrap (///pom.write profile))
-       _ (..save! system (|> pom (:: xml.codec encode) encoding.to-utf8)
+       pom (\ promise.monad wrap (///pom.write profile))
+       _ (..save! system (|> pom (\ xml.codec encode) encoding.to-utf8)
                   (format artifact-name ///artifact/extension.pom))
        #let [_ (log! "Successfully installed locally!")]]
       (wrap []))
 
     _
-    (:: promise.monad wrap (exception.throw /.no-identity []))))
+    (\ promise.monad wrap (exception.throw /.no-identity []))))