Improve inline doc

2014-10-01 20:16:02 +02:00 · 2014-10-01 20:16:02 +02:00 · eaaa699035
parent 824ae57a05
commit eaaa699035
1 changed files with 2 additions and 0 deletions
--- a/Main.hs
+++ b/Main.hs
@ -58,6 +58,8 @@ main = do
                                                  da
  _ <- onClicked saveButton $ onClickedSaveButton fileButton
  _ <- onClicked quitButton mainQuit
+
+  -- hotkeys
  _ <- window `on` keyPressEvent $ tryEvent $ do
         [Control] <- eventModifier
         "q"       <- eventKeyName