aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/dependency/deployment.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/test/aedifex/dependency/deployment.lux')
-rw-r--r--stdlib/source/test/aedifex/dependency/deployment.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/test/aedifex/dependency/deployment.lux b/stdlib/source/test/aedifex/dependency/deployment.lux
index ec2ecad3d..0add3a487 100644
--- a/stdlib/source/test/aedifex/dependency/deployment.lux
+++ b/stdlib/source/test/aedifex/dependency/deployment.lux
@@ -69,7 +69,7 @@
[_ (: (IO Any)
(case [method input]
[#@http.Put (#.Some input)]
- (atom.update (dictionary.put url input) cache)
+ (atom.update! (dictionary.put url input) cache)
_
(in [])))]
@@ -158,7 +158,7 @@
repository (repository.async (remote.repository http #.None address))]]
(in (do async.monad
[?outcome (/.one repository dependency package)
- cache (async.future (atom.read cache))]
+ cache (async.future (atom.read! cache))]
(_.cover' [/.one]
(|> ?outcome
(try\map (verify_one 1 address package cache expected_artifact))
@@ -181,7 +181,7 @@
repository (repository.async (remote.repository http #.None address))]]
(in (do async.monad
[?outcome (/.all repository resolution)
- cache (async.future (atom.read cache))]
+ cache (async.future (atom.read! cache))]
(_.cover' [/.all]
(|> ?outcome
(try\map (function (_ actual_artifacts)