more interactions.

desktop/src-common/advent/utils.clj

@@ -11,7 +11,7 @@
   (let [{:keys [x y]} (input->screen screen {:x (:input-x screen) :y (:input-y screen)})]
     (println (:input-x screen) (:input-y screen) "->" x y)))
 
-(def +all-cursors+ [:main :wool :look :talk :right :down :left :up])
+(def +all-cursors+ [:main :wool :mushrooms :talk :right :down :left :up])
 
 (defn cursor [filename which]
   (let [scale 2