diff options
Diffstat (limited to 'src/compiler/GFServer.hs')
| -rw-r--r-- | src/compiler/GFServer.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/compiler/GFServer.hs b/src/compiler/GFServer.hs index c28a99c5e..a81b6b397 100644 --- a/src/compiler/GFServer.hs +++ b/src/compiler/GFServer.hs @@ -150,7 +150,7 @@ handle documentroot state0 cache execute1 case (takeDirectory path,takeFileName path,takeExtension path) of (_ ,_ ,".pgf") -> wrapCGI $ PS.cgiMain' cache path (dir,"grammars.cgi",_ ) -> grammarList dir (decoded qs) - (dir ,"exb.fcgi" ,_ ) -> wrapCGI $ ES.cgiMain' root dir cache + (dir ,"exb.fcgi" ,_ ) -> wrapCGI $ ES.cgiMain' root dir (fst cache) _ -> liftIO $ serveStaticFile path where path = translatePath rpath _ -> err $ resp400 upath |