haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix docs

Browse Source
This commit is contained in:
Michael Snoyman 2011-05-13 09:13:20 +03:00
parent 0b6da81f40
commit 1150c7e9b8
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
Yesod/Helpers/Static.hs
View File

@ -218,10 +218,10 @@ mkStaticFiles :: FilePath -> StaticSite -> Q [Dec]
mkStaticFiles fp StaticSite = mkStaticFiles' fp "StaticRoute" True mkStaticFiles fp StaticSite = mkStaticFiles' fp "StaticRoute" True
mkStaticFiles fp PublicSite = mkStaticFiles' fp "PublicRoute" False mkStaticFiles fp PublicSite = mkStaticFiles' fp "PublicRoute" False
mkStaticFiles' :: FilePath -> -- ^ static directory mkStaticFiles' :: FilePath -- ^ static directory
String -> -- ^ route constructor "StaticRoute" -> String -- ^ route constructor "StaticRoute"
Bool -> -- ^ append checksum query parameter -> Bool -- ^ append checksum query parameter
Q [Dec] -> Q [Dec]
mkStaticFiles' fp routeConName makeHash = do mkStaticFiles' fp routeConName makeHash = do
fs <- qRunIO $ getFileListPieces fp fs <- qRunIO $ getFileListPieces fp
concat `fmap` mapM mkRoute fs concat `fmap` mapM mkRoute fs

2
yesod-static.cabal
View File

@ -1,5 +1,5 @@
name: yesod-static name: yesod-static
version: 0.2.0 version: 0.2.0.1
license: BSD3 license: BSD3
license-file: LICENSE license-file: LICENSE
author: Michael Snoyman <michael@snoyman.com> author: Michael Snoyman <michael@snoyman.com>