diff --git a/sand.flan b/sand.flan
index a453575..6afc3b6 100644
--- a/sand.flan
+++ b/sand.flan
@@ -92,12 +92,12 @@
     h))
 
 (defn game-update [] ()
-  (when (rl/key-pressed? :r) (clear-grid))
-  (when (rl/mouse-button-down? :left)
+  (when (rl/key-pressed? :key-r) (clear-grid))
+  (when (rl/mouse-button-down? :mouse-left)
     (let [m (rl/get-mouse-position)]
       (paint-at (/ (i32 (.y m)) cell-size)
                 (/ (i32 (.x m)) cell-size))))
-  (when (rl/mouse-button-released? :left) (next-color))
+  (when (rl/mouse-button-released? :mouse-left) (next-color))
   (step))
 
 (defn game-draw [] ()