Fixes for CGI scripts in a subpath

Yesod/Dispatch.hs

@@ -171,7 +171,7 @@ toWaiApp :: (Yesod y, YesodSite y) => y -> IO W.Application
 toWaiApp a =
     return $ gzip
            $ jsonp
-           $ cleanPath
+           $ cleanPathRel (B.pack $ approot a)
            $ toWaiApp' a
 
 toWaiApp' :: (Yesod y, YesodSite y)

yesod.cabal

@@ -1,5 +1,5 @@
 name:            yesod
-version:         0.3.1
+version:         0.3.1.1
 license:         BSD3
 license-file:    LICENSE
 author:          Michael Snoyman <michael@snoyman.com>
@@ -23,7 +23,7 @@ library
     build-depends:   base >= 4 && < 5,
                      time >= 1.1.3 && < 1.2,
                      wai >= 0.1.0 && < 0.2,
-                     wai-extra >= 0.1.2 && < 0.2,
+                     wai-extra >= 0.1.3 && < 0.2,
                      authenticate >= 0.6.2 && < 0.7,
                      bytestring >= 0.9.1.4 && < 0.10,
                      directory >= 1 && < 1.1,