diff --git a/2024/src/day06.clj b/2024/src/day06.clj index 3d5c3ac..875b667 100644 --- a/2024/src/day06.clj +++ b/2024/src/day06.clj @@ -41,9 +41,7 @@ :else (let [pos' (move dir pos)] (if (= (get-char pos') \#) (recur pos (turn-right dir) (conj path [dir pos])) - (recur pos' - dir - (conj path [dir pos]))))))) + (recur pos' dir (conj path [dir pos]))))))) (defn add-obstacle [[row col]] (update input row assoc col \#))