actually get ladder, also fixes performance problem.

desktop/src-common/advent/screens/scene.clj

@@ -264,7 +264,7 @@
 
   :on-mouse-moved
   (fn [screen [entities]]
-    (when (get-in entities [:state :active?])
+    #_(when (get-in entities [:state :active?])
       (let [{:keys [x y]} (input->screen screen {:x (:input-x screen) :y (:input-y screen)})]
         (if-let [mouse-override (find-override screen entities [x y])]
           (assoc-in entities [:cursor :override] (:cursor mouse-override))