From ef344c57945d455c6752c2032c701d7f9315f69b Mon Sep 17 00:00:00 2001 From: tv Date: Sat, 17 Oct 2015 19:08:15 +0200 Subject: replace hirc.hs by main.hs --- Event.hs | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100644 Event.hs (limited to 'Event.hs') diff --git a/Event.hs b/Event.hs new file mode 100644 index 0000000..87fc4e7 --- /dev/null +++ b/Event.hs @@ -0,0 +1,16 @@ +module Event where + +import Blessings +import Scanner +import qualified Hirc + +data Event = + EFlash (Blessings String) | + EScan Scan | + EReload | + EResize Int Int | + EPutLn String | + EHircConnect Hirc.Bot | + EHircMessage Hirc.Message | + EHircError Hirc.Error | + ETick -- cgit v1.2.3