import Hope
import Config
import Network.FastCGI
import Control.Exception (catch)
import Prelude hiding (catch)

main :: IO ()
main = catch (dbConnect (\db -> runFastCGI (handleErrors (hopeMain config db))))
             (\e -> runOneFastCGI (outputException e))