Splittertech/tickLeisteServer
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

added fastcgi support

Browse source
This commit is contained in:
Dennis Frieberg 2021-03-18 18:13:47 +01:00
parent 5f7fa8ce2b
commit 7662744153
2 changed files with 14 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

8
app/Backend/FastCGI.hs
View file

@ -1 +1,9 @@
module Backend.FastCGI where
import Config
import qualified Network.Wai as Wai
import qualified Network.Wai.Handler.FastCGI as Fcgi
import Control.Concurrent.MVar
forkFastCGIBackend :: Wai.Application -> IO [MVar ()]
forkFastCGIBackend = fmap (: []) . forkBackend . Fcgi.run