diff --git a/src/island_client.ml b/src/island_client.ml
index 2f7ebc9..75a0f91 100644
--- a/src/island_client.ml
+++ b/src/island_client.ml
@@ -120,44 +120,3 @@ let () =
   on_window_load init_bg ();
   on_window_load bind_keys ();
   on_window_load G.request_animation_frame game_loop
-
-(*
-  let draw_background () =
-    for x = 0 to tiles_per_w - 1 do
-      for y = 0 to tiles_per_h - 1 do
-        let (_ : Jv.t) =
-          Jv.call context "drawImage"
-            [| grass
-             ; Jv.of_int (orig_x + (x * tile_size))
-             ; Jv.of_int (orig_y + (y * tile_size))
-            |]
-        in
-        ()
-      done
-    done
-
-let () =
-  let (_ : Jv.t) =
-    Jv.call window "addEventListener"
-      [| Jv.of_string "load"; Jv.repr draw_background |]
-  in
-  ()
-
-let draw_papy () =
-  let (_ : Jv.t) =
-    Jv.call context "drawImage"
-      [| papy_bottom
-       ; Jv.of_int ((width / 2) - (tile_size / 2))
-       ; Jv.of_int ((height / 2) - (tile_size / 2))
-      |]
-  in
-  ()
-
-let () =
-  let (_ : Jv.t) =
-    Jv.call window "addEventListener"
-      [| Jv.of_string "load"; Jv.repr draw_papy |]
-  in
-  ()
-
-*)