git-svn-id: https://ssl.buetow.org/repos/hsbot/trunk@48 9f8f72e9-4bf4-416e-b76e-7d4203597157

1 files changed, 0 insertions, 27 deletions

diff --git a/HsBot/Logics/IRCKarma.hs b/HsBot/Logics/IRCKarma.hs
deleted file mode 100644
index 55c74d7..0000000
--- a/HsBot/Logics/IRCKarma.hs
+++ /dev/null
@@ -1,27 +0,0 @@
-module HsBot.Logics.IrcKarma where
-
-import HsBot.Env
-import HsBot.Logics
-
-data Karma = Karma { 
-      karmaName :: String, 
-      minPts :: Int, 
-      minPerc :: Float
-   } deriving (Show, Read)
-
-instance Eq Karma where 
-   x == y = (minPerc x) == (minPerc y) && (minPts x == minPts y)
-
-instance Ord Karma where
-   x > y
-      | (minPerc x) > (minPerc y) = True
-      | otherwise = (minPts x) > (minPts y)
-   x < y
-      | (minPerc x) < (minPerc y) = True
-      | otherwise = (minPts x) < (minPts y)
-   x >= y = not (x < y)
-   x <= y = not (x > y)
-
-instance Logics Karma where
-	logicsRun str env = return (env)
-