Permalink
Browse files

Latest changes

  • Loading branch information...
1 parent b64059b commit 91ec557bb9181c649092d31b486a179eb1083083 Chris Eidhof committed Apr 19, 2009
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

0 comments on commit 91ec557

Please sign in to comment.