Permalink
Browse files

Use PATH_INFO

  • Loading branch information...
1 parent b64059b commit 5a88263e180f4b5b01cdac66319ea0de430e1292 @eelco eelco committed Apr 19, 2009
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/Happstack/Server/FastCGI.hs
@@ -88,7 +88,7 @@ cgiMethod :: CGIRequest -> Method
cgiMethod x = withDef GET $ (x ? "HTTP_METHOD") >>= maybeRead
cgiPaths :: CGIRequest -> [String]
-cgiPaths = split '/' . str "SCRIPT_NAME"
+cgiPaths = split '/' . str "PATH_INFO"
cgiQuery :: CGIRequest -> String
cgiQuery x = '?':(str "QUERY_STRING" x)

0 comments on commit 5a88263

Please sign in to comment.