1 files changed, 3 insertions, 1 deletions
diff --git a/src/Much/Event.hs b/src/Much/Event.hs
index 9842327..5edb5d2 100644
--- a/src/Much/Event.hs
+++ b/src/Much/Event.hs
@@ -1,6 +1,7 @@
 module Much.Event where
 
 import Blessings
+import Much.State
 import Scanner
 
 data Event =
@@ -8,5 +9,6 @@ data Event =
     EScan Scan |
     EShutdown |
     EReload |
-    EResize Int Int
+    EResize Int Int |
+    EStateGet (State -> IO ())
   deriving Show