# HG changeset patch
# User koda
# Date 1289761607 -3600
# Node ID 82cfbbab73da86bddbc8ad25f33255762f99f016
# Parent  ae71dff40ecc405a55647b0f52f628674c1ebb51
fix compilation server for me

diff -r ae71dff40ecc -r 82cfbbab73da gameServer/Actions.hs
--- a/gameServer/Actions.hs	Sun Nov 14 21:36:47 2010 +0300
+++ b/gameServer/Actions.hs	Sun Nov 14 20:06:47 2010 +0100
@@ -6,9 +6,9 @@
 import qualified Data.IntSet as IntSet
 import qualified Data.Sequence as Seq
 import System.Log.Logger
-import Monad
+import Control.Monad
 import Data.Time
-import Maybe
+import Data.Maybe
 -----------------------------
 import CoreTypes
 import Utils
diff -r ae71dff40ecc -r 82cfbbab73da gameServer/HWProtoCore.hs
--- a/gameServer/HWProtoCore.hs	Sun Nov 14 21:36:47 2010 +0300
+++ b/gameServer/HWProtoCore.hs	Sun Nov 14 20:06:47 2010 +0100
@@ -2,7 +2,7 @@
 
 import qualified Data.IntMap as IntMap
 import Data.Foldable
-import Maybe
+import Data.Maybe
 --------------------------------------
 import CoreTypes
 import Actions
diff -r ae71dff40ecc -r 82cfbbab73da gameServer/HWProtoInRoomState.hs
--- a/gameServer/HWProtoInRoomState.hs	Sun Nov 14 21:36:47 2010 +0300
+++ b/gameServer/HWProtoInRoomState.hs	Sun Nov 14 20:06:47 2010 +0100
@@ -5,7 +5,7 @@
 import qualified Data.Map as Map
 import Data.Sequence(Seq, (|>), (><), fromList, empty)
 import Data.List
-import Maybe
+import Data.Maybe
 --------------------------------------
 import CoreTypes
 import Actions
diff -r ae71dff40ecc -r 82cfbbab73da gameServer/HWProtoLobbyState.hs
--- a/gameServer/HWProtoLobbyState.hs	Sun Nov 14 21:36:47 2010 +0300
+++ b/gameServer/HWProtoLobbyState.hs	Sun Nov 14 20:06:47 2010 +0100
@@ -4,7 +4,7 @@
 import qualified Data.IntMap as IntMap
 import qualified Data.IntSet as IntSet
 import qualified Data.Foldable as Foldable
-import Maybe
+import Data.Maybe
 import Data.List
 import Data.Word
 --------------------------------------
diff -r ae71dff40ecc -r 82cfbbab73da gameServer/HWProtoNEState.hs
--- a/gameServer/HWProtoNEState.hs	Sun Nov 14 21:36:47 2010 +0300
+++ b/gameServer/HWProtoNEState.hs	Sun Nov 14 20:06:47 2010 +0100
@@ -1,7 +1,7 @@
 module HWProtoNEState where
 
 import qualified Data.IntMap as IntMap
-import Maybe
+import Data.Maybe
 import Data.List
 import Data.Word
 --------------------------------------
diff -r ae71dff40ecc -r 82cfbbab73da gameServer/OfficialServer/DBInteraction.hs
--- a/gameServer/OfficialServer/DBInteraction.hs	Sun Nov 14 21:36:47 2010 +0300
+++ b/gameServer/OfficialServer/DBInteraction.hs	Sun Nov 14 20:06:47 2010 +0100
@@ -11,8 +11,7 @@
 import qualified Control.Exception as Exception
 import Control.Monad
 import qualified Data.Map as Map
-import Monad
-import Maybe
+import Data.Maybe
 import System.Log.Logger
 import Data.Time
 ------------------------
diff -r ae71dff40ecc -r 82cfbbab73da gameServer/Opts.hs
--- a/gameServer/Opts.hs	Sun Nov 14 21:36:47 2010 +0300
+++ b/gameServer/Opts.hs	Sun Nov 14 20:06:47 2010 +0100
@@ -3,7 +3,7 @@
     getOpts,
 ) where
 
-import System
+import System.Environment ( getArgs )
 import System.Console.GetOpt
 import Network
 import Data.Maybe ( fromMaybe )
diff -r ae71dff40ecc -r 82cfbbab73da gameServer/Utils.hs
--- a/gameServer/Utils.hs	Sun Nov 14 21:36:47 2010 +0300
+++ b/gameServer/Utils.hs	Sun Nov 14 20:06:47 2010 +0100
@@ -13,7 +13,7 @@
 import System.IO
 import qualified Data.List as List
 import Control.Monad
-import Maybe
+import Data.Maybe
 -------------------------------------------------
 import qualified Codec.Binary.Base64 as Base64
 import qualified Data.ByteString.UTF8 as BUTF8