webAppSettingsWithLookup should take a dir param
commite2fbc9b81d9bbeed6076fde9778ef8dcc6f9bd80
authorGreg Weber <greg@gregweber.info>
dateSun 28 Aug 2011, 13:13 (15 years ago)
parenta02f907
wai-app-static/Network/Wai/Application/Static.hs+3−3
@@ -405,9 +405,9 @@ defaultMkRedirect pieces newPath
405405 where
406406 relDir = TE.encodeUtf8 (relativeDirFromPieces pieces)
407407
408−webAppSettingsWithLookup :: ETagLookup -> StaticSettings
409−webAppSettingsWithLookup etagLookup =
410− defaultWebAppSettings { ssFolder = webAppLookup etagLookup "static"}
408+webAppSettingsWithLookup :: FilePath -> ETagLookup -> StaticSettings
409+webAppSettingsWithLookup dir etagLookup =
410+ defaultWebAppSettings { ssFolder = webAppLookup etagLookup dir}
411411
412412
413413defaultWebAppSettings :: StaticSettings
wai-app-static/wai-app-static.cabal+1−1
@@ -1,5 +1,5 @@
11name: wai-app-static
2−version: 0.3.2.0
2+version: 0.3.2.1
33license: BSD3
44license-file: LICENSE
55author: Michael Snoyman <michael@snoyman.com>