day6: learned read-string

diff --git a/day6/part2.clj b/day6/part2.clj
index cdcc3b5d96c2a0e6921a90b7970e35367816918a..ad6fe91d7498e6f78849742e954bce00f4d8421b 100644 (file)
--- 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 %))]