From 424f1589137f994cbf8041f8d11d3aaaed5605a1 Mon Sep 17 00:00:00 2001
From: tv <tv@shackspace.de>
Date: Tue, 30 Dec 2014 14:38:33 +0100
Subject: move data Event to separate module

---
 test5.hs | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

(limited to 'test5.hs')

diff --git a/test5.hs b/test5.hs
index c7a4468..fa3f4bb 100644
--- a/test5.hs
+++ b/test5.hs
@@ -19,6 +19,7 @@ import Control.Monad
 import Data.Maybe
 import Data.Monoid
 import Data.Time
+import Event
 import Scanner (getKey)
 import System.Directory
 import System.Environment
@@ -35,13 +36,6 @@ import TreeViewRaw
 import Utils
 
 
-data Event =
-    EFlash (Trammel String) |
-    EKey String |
-    EReload |
-    EResize Int Int
-  deriving Show
-
 
 data State = State
     { cursor :: Z.TreePos Z.Full TreeView
-- 
cgit v1.2.3