From 0bfae00d0791512fef41055a21afb2c86c22be9b Mon Sep 17 00:00:00 2001
From: pb <pb@9f8f72e9-4bf4-416e-b76e-7d4203597157>
Date: Sun, 29 Nov 2009 17:40:38 +0000
Subject: git-svn-id: https://ssl.buetow.org/repos/hsbot/trunk@8
 9f8f72e9-4bf4-416e-b76e-7d4203597157

---
 HsBot.hs | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/HsBot.hs b/HsBot.hs
index aa3f812..1baa1b8 100644
--- a/HsBot.hs
+++ b/HsBot.hs
@@ -39,10 +39,7 @@ instance Eq User where x == y = (userPts x) == (userPts y)
 instance Ord User where
 	x < y = (userPts x) < (userPts y)
 	x > y = (userPts x) > (userPts y)
-	x >= y = not (maxLoggMessages :: Int
-maxLoggMessages = 10
-
-x < y)
+	x >= y = not (x < y)
 	x <= y = not (x > y)
 
 class Render a where render :: a -> String
-- 
cgit v1.2.3