diff options
| author | hallgren <hallgren@chalmers.se> | 2012-02-23 16:46:21 +0000 |
|---|---|---|
| committer | hallgren <hallgren@chalmers.se> | 2012-02-23 16:46:21 +0000 |
| commit | e30eeb4918ed970040ab5209d36c14335881b5b5 (patch) | |
| tree | 048823262d6c3f68fa4c2036a50a3faa57770b46 /src/server/ContentService.hs | |
| parent | 4ba99446636fc3b937b95362a86db84538b8a1c4 (diff) | |
src/server/ContentService.hs: fix compilaton problem
Diffstat (limited to 'src/server/ContentService.hs')
| -rw-r--r-- | src/server/ContentService.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/server/ContentService.hs b/src/server/ContentService.hs index 297b3c881..0f2eb6508 100644 --- a/src/server/ContentService.hs +++ b/src/server/ContentService.hs @@ -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" |