@ -61,7 +61,7 @@
sy (* y tileheight)]
(.drawImage ctx image
sx sy tilewidth tileheight
(:x dest) (:y dest)
(int (:x dest)) (int (:y dest))
target-width target-height)))
(defn draw-viewport [map-def ctx viewport]