From eaaa69903550c7eb1215f0aad7736d46be25fcbf Mon Sep 17 00:00:00 2001
From: hasufell <hasufell@hasufell.de>
Date: Wed, 1 Oct 2014 20:16:02 +0200
Subject: [PATCH] Improve inline doc

---
 Main.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Main.hs b/Main.hs
index e133402..0284a13 100644
--- 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