day2: one more update

diff --git a/day2/part1.clj b/day2/part1.clj
index 6b092127d10720a00951df579ab40c79907c34cd..d301b37179b4bdd4b9cd3c9ee03d840b93e5996f 100644 (file)
--- a/day2/part1.clj
+++ b/day2/part1.clj
@@ -16,10 +16,12 @@
             n (Integer/parseInt (second ins))
             ]
         (recur
-          (case (first ins)
-            "forward" (update-in data [:xpos] + n)
-            "up" (update-in data [:depth] - n)
-            "down" (update-in data [:depth] + n)
+          (apply (partial update-in data)
+            (case (first ins)
+              "forward" [[:xpos] + n]
+              "up" [[:depth] - n]
+              "down" [[:depth] + n]
+              )
             )
           )
         )