Fixed some warnings

MedeaMelana · May 10, 2014 · 896c304 · 896c304
1 parent d2e992d
commit 896c304
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 4 deletions.
diff --git a/Magic-Web-Server/src/Magic/Json.hs b/Magic-Web-Server/src/Magic/Json.hs
@@ -10,12 +10,11 @@ import Magic.Engine.Types
 import qualified Magic.IdList as IdList
 
 import Control.Applicative ((<$>))
-import Control.Monad (liftM, mzero, (>=>))
+import Control.Monad (mzero, (>=>))
 
 import Data.Aeson (ToJSON(..), FromJSON(..), Value(..), (.=), decode)
 import Data.Aeson.Types (Pair, Parser, parse, (.:))
 import qualified Data.Aeson as Aeson
-import Data.Attoparsec.Number
 import Data.ByteString.Lazy (ByteString)
 import qualified Data.ByteString.Lazy.Char8 as BS
 import Data.Char (toLower)
@@ -26,7 +25,7 @@ import Data.Traversable (for)
 import qualified Data.Vector as Vector
 import Debug.Trace (trace)
 
-import Safe (atMay, readMay)
+import Safe (atMay)
 
 
 

diff --git a/Magic-Web-Server/src/Main.hs b/Magic-Web-Server/src/Main.hs
@@ -12,7 +12,6 @@ import Magic.Json
 import Control.Monad.Operational (ProgramT, ProgramViewT(..), viewT)
 import Control.Monad.Random (evalRandT, newStdGen, RandT, StdGen)
 import Control.Monad.State (evalStateT)
-import Control.Monad.Trans (liftIO)
 
 import Data.Aeson (encode)
 import Data.Monoid ((<>))