From 0e3b0f4732541d14b2fbc1e740d5e86206df6e9a Mon Sep 17 00:00:00 2001
From: Clyne Sullivan <clyne@bitgloo.com>
Date: Mon, 6 Dec 2021 18:28:24 -0500
Subject: [PATCH] day6: learned read-string

---
 day6/part2.clj | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/day6/part2.clj b/day6/part2.clj
index cdcc3b5..ad6fe91 100644
--- a/day6/part2.clj
+++ b/day6/part2.clj
@@ -2,7 +2,7 @@
 
 (->> (read-line)
      (#(str/split % #","))
-     (map #(Integer/parseInt %))
+     (map read-string)
      (reduce #(update %1 %2 inc) (vec (repeat 9 0)))
      (iterate
        #(let [nf (conj (vec (rest %)) (first %))]