src/server/ContentService.hs: fix compilaton problem

This commit is contained in:
hallgren
2012-02-23 16:46:21 +00:00
parent 3daf76c559
commit 9dbe4ba41a
2 changed files with 12 additions and 3 deletions

View File

@@ -14,11 +14,13 @@ import qualified Codec.Binary.UTF8.String as UTF8 (encodeString, decodeString)
import Control.Monad
import Control.Exception
import Control.Concurrent(forkIO)
import System.Environment(getArgs)
import System.Time
import System.Locale
import System.FilePath
import Database.HSQL.MySQL
import Database.HSQL.Types(toSqlValue)
logFile :: FilePath
logFile = "content-error.log"