This commit is contained in:
nek0 2017-12-19 17:35:06 +01:00
parent 27179fd225
commit adda5d3dc4

View file

@ -92,7 +92,7 @@ drawMenu = do
textBox ctx 0 200 800 "HASKELLOIDS"
fillColor ctx (rgba 255 128 0 (alpha $ fade ud))
fontSize ctx 40
textBox ctx 0 350 800 "Press [Space] to PLay\nPress [Esc] to exit"
textBox ctx 0 350 800 "Press [Space] to Play\nPress [Esc] to exit"
restore ctx
-- t <- getElapsedTime
-- liftIO $ drawSpinner (nano ud) 100 100 100 t