fixing minor bug in variable conversion to CGI. was: Accept -> ACCEPTHTTP_, now Accept -> HTTP_ACCEPT
commit51a6fa948f5ff46519c0d081dc8c496e358903df
authordbpatterson <dbpatterson@riseup.net>
dateSun 12 Jul 2009, 14:19 (17 years ago)
parent396cd20
Hack/Frontend/MonadCGI.hs+1−1
@@ -39,7 +39,7 @@ cgiToApp cgi env = do
3939 return $ Response status' headers' output
4040
4141fixVarName :: String -> String
42−fixVarName = (flip (++) $ "HTTP_") . map fixVarNameChar
42+fixVarName = ((++) $ "HTTP_") . map fixVarNameChar
4343
4444fixVarNameChar :: Char -> Char
4545fixVarNameChar '-' = '_'