From 17629d66062b88b040a2397032f6c08361a5f3a7 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 12 Aug 2021 03:12:42 -0400
Subject: Improved binding syntax for "syntax:".

---
 stdlib/source/test/aedifex/dependency/deployment.lux | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/stdlib/source/test/aedifex/dependency/deployment.lux b/stdlib/source/test/aedifex/dependency/deployment.lux
index 7352de63a..ccccc47cd 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.has url input) cache)
                
                _
                (in [])))]
@@ -172,7 +172,7 @@
                            (random.set hash num_bundles)
                            (\ ! map set.list))
                .let [resolution (list\fold (function (_ [dependency expected_artifact package] resolution)
-                                             (dictionary.put dependency package resolution))
+                                             (dictionary.has dependency package resolution))
                                            resolution.empty
                                            bundles)
                      cache (: Cache
-- 
cgit v1.2.3