diff options
Diffstat (limited to 'src/server/PGFService.hs')
| -rw-r--r-- | src/server/PGFService.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/server/PGFService.hs b/src/server/PGFService.hs index 3caf36c91..b6a5b8eb6 100644 --- a/src/server/PGFService.hs +++ b/src/server/PGFService.hs @@ -20,9 +20,12 @@ import Data.Maybe import System.Directory import System.FilePath +logFile :: FilePath +logFile = "pgf-error.log" main :: IO () -main = do initFastCGI +main = do stderrToFile logFile + initFastCGI cache <- newCache PGF.readPGF runFastCGIConcurrent' forkIO 100 (handleErrors (handleCGIErrors (cgiMain cache))) |