pass static directory onto wai-app-static

This commit is contained in:
Greg Weber 2011-08-28 13:13:55 -07:00
parent 5208982b1d
commit f200e9caec
2 changed files with 4 additions and 4 deletions

View File

@ -87,13 +87,13 @@ newtype Static = Static StaticSettings
static :: Prelude.FilePath -> IO Static static :: Prelude.FilePath -> IO Static
static dir = do static dir = do
hashLookup <- cachedETagLookup dir hashLookup <- cachedETagLookup dir
return $ Static $ webAppSettingsWithLookup hashLookup return $ Static $ webAppSettingsWithLookup (toFilePath dir) hashLookup
-- | like static, but checks to see if the file has changed -- | like static, but checks to see if the file has changed
staticDevel :: Prelude.FilePath -> IO Static staticDevel :: Prelude.FilePath -> IO Static
staticDevel dir = do staticDevel dir = do
hashLookup <- cachedETagLookupDevel dir hashLookup <- cachedETagLookupDevel dir
return $ Static $ webAppSettingsWithLookup hashLookup return $ Static $ webAppSettingsWithLookup (toFilePath dir) hashLookup
-- | Produces a 'Static' based on embedding file contents in the executable at -- | Produces a 'Static' based on embedding file contents in the executable at
-- compile time. -- compile time.

View File

@ -1,5 +1,5 @@
name: yesod-static name: yesod-static
version: 0.3.0 version: 0.3.0.1
license: BSD3 license: BSD3
license-file: LICENSE license-file: LICENSE
author: Michael Snoyman <michael@snoyman.com> author: Michael Snoyman <michael@snoyman.com>
@ -28,7 +28,7 @@ library
, template-haskell , template-haskell
, directory >= 1.0 && < 1.2 , directory >= 1.0 && < 1.2
, transformers >= 0.2 && < 0.3 , transformers >= 0.2 && < 0.3
, wai-app-static >= 0.3.2 && < 0.4 , wai-app-static >= 0.3.2.1 && < 0.4
, wai >= 0.4 && < 0.5 , wai >= 0.4 && < 0.5
, text >= 0.5 && < 1.0 , text >= 0.5 && < 1.0
, file-embed >= 0.0.4.1 && < 0.5 , file-embed >= 0.0.4.1 && < 0.5