Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Latest changes

  • Loading branch information...
commit 91ec557bb9181c649092d31b486a179eb1083083 1 parent b64059b
Chris Eidhof authored
Showing with 2 additions and 1 deletion.
  1. +1 −0  happstack-fastcgi.cabal
  2. +1 −1  src/Happstack/Server/FastCGI.hs
View
1  happstack-fastcgi.cabal
@@ -3,6 +3,7 @@ Version: 0.1
Copyright: Tupil
Maintainer: ce@tupil.com, eml@tupil.com
License: BSD3
+license-file: COPYING
build-type: Simple
category: Web
build-depends: base>=2.0, cgi >= 3000.0.0, fastcgi >= 3001.0.2, mtl, happstack-server, containers >= 0.2.0, utf8-string >= 0.3.4, bytestring
View
2  src/Happstack/Server/FastCGI.hs
@@ -78,7 +78,7 @@ r ? k = M.lookup k $ cgiVars r
-- | Like fromJust, but with a default value in case of Nothing.
withDef x = maybe x id
--- | Look up a String in the cgiVars, returning "" if the key isn't present
+-- | Look up a String in the cgiVars, returning the empty string if the key is not present
str k v = withDef "" (v ? k)
cgiUri :: CGIRequest -> String
Please sign in to comment.
Something went wrong with that request. Please try again.