[Fencommits] fenserve: oops, made a change and didn't test after that that initialization of the pool worked correctly

[Benja Fallenstein]

Mon Mar 26 01:59:16 EEST 2007  Benja Fallenstein <benja.fallenstein at gmail.com>
  * oops, made a change and didn't test after that that initialization of the pool worked correctly
diff -rN -u old-fenserve/Main.hs new-fenserve/Main.hs
--- old-fenserve/Main.hs	2007-03-26 01:59:23.000000000 +0300
+++ new-fenserve/Main.hs	2007-03-26 01:59:23.000000000 +0300
@@ -63,7 +63,7 @@
       (ResourceLimit $ 50 * mb) (ResourceLimit $ 100 * mb)
   pn <- getProgName; let dir = pn++"_storm"
   createDirectoryIfMissing True dir
-  runFenServe writeEmptyState (error "Main: shouldn't be evaluated") (Just dir)
+  (_,_,pool) <- runFenServe writeEmptyState (error "Main: shouldn't be evaluated") (Just dir); writePool pool
   stdHTTP [ debugFilter
           --, localhostOnlyFilter
           , fenserveHandler dir