From 735d84cb330b36756e022c4ca5e90f8e56f7a8e9 Mon Sep 17 00:00:00 2001
From: Jeena <spam@jeenaparadies.net>
Date: Mon, 9 Jun 2014 22:13:44 +0200
Subject: [PATCH] smal fixes

---
 cnb.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/cnb.hs b/cnb.hs
index d8f5696..066285d 100644
--- a/cnb.hs
+++ b/cnb.hs
@@ -120,7 +120,7 @@ evalPrivmsg (Just m@(Message n _ te)) = do
   let pat = nick ++ ":(.*)"
   let r = te =~ pat :: [[String]]
   case r of
-    [] -> do m <- match te
+    [] -> do m <- Main.match te
              case m of
                Just v -> privmsg v
                Nothing -> return ()
@@ -144,7 +144,7 @@ action "list" (Message n _ _) = do
   mapM (\(k,v) -> msg (k ++ "~" ++ v) n) st
   return () 
 action "leave" (Message n _ _) = do
-  leave ("Fuck you " ++ n ++ ", I'm quitting!")
+  leave ("Ok " ++ n ++ ", I'm quitting!")
 action "implode" (Message n _ _) = do
     leave ("whoooooooshhhhh ...")
 action "explode" (Message n _ _) = do