aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/aedifex/command/deploy/snapshot.lux
diff options
context:
space:
mode:
authorEduardo Julian2022-04-08 01:49:29 -0400
committerEduardo Julian2022-04-08 01:49:29 -0400
commite5e4c2aff562e5c01fefb808d1d68a40f29c9cc5 (patch)
tree6b56a158a19debc0d3cd1d98e88e2ee91ed8a823 /stdlib/source/program/aedifex/command/deploy/snapshot.lux
parentc85697eee8ce3dac5480a3ba2b31cc4943e1d8e6 (diff)
Can now deploy releases with Aedifex.
Diffstat (limited to 'stdlib/source/program/aedifex/command/deploy/snapshot.lux')
-rw-r--r--stdlib/source/program/aedifex/command/deploy/snapshot.lux10
1 files changed, 8 insertions, 2 deletions
diff --git a/stdlib/source/program/aedifex/command/deploy/snapshot.lux b/stdlib/source/program/aedifex/command/deploy/snapshot.lux
index 9770965d9..fa69e8311 100644
--- a/stdlib/source/program/aedifex/command/deploy/snapshot.lux
+++ b/stdlib/source/program/aedifex/command/deploy/snapshot.lux
@@ -2,12 +2,13 @@
[library
[lux "*"
[abstract
- [monad {"+" do}]]
+ [monad {"+" do}]
+ [predicate {"+" Predicate}]]
[control
[concurrency
["[0]" async {"+" Async}]]]
[data
- [text
+ ["[0]" text
[encoding
["[0]" utf8]]]
[collection
@@ -37,6 +38,11 @@
["[1][0]" artifact {"+" Artifact}
["[1]/[0]" type]]])
+(def: .public snapshot?
+ (Predicate Artifact)
+ (|>> (the ////artifact.#version)
+ (text.contains? "-SNAPSHOT")))
+
(def: .public (do! console remote fs artifact profile)
(-> (Console Async) (Repository Async) (file.System Async) Artifact (Command Any))
(do [! ////action.monad]