on master help sign in
Wrote some more documentation.
59e3c7fJasper Van der Jeugt
src/Text/Hakyll/CompressCSS.hs+2
@@ -1,3 +1,5 @@
1+-- | Module used for CSS compression. The compression is currently in a simple
2+-- state, but would typically reduce the number of bytes by about 25%.
1module Text.Hakyll.CompressCSS
3module Text.Hakyll.CompressCSS
2 ( compressCSS
4 ( compressCSS
3 ) where
5 ) where
src/Text/Hakyll/Page.hs+1−1
@@ -1,10 +1,10 @@
1+-- | A module for dealing with "Page"s. This module is mostly internally used.
1module Text.Hakyll.Page
2module Text.Hakyll.Page
2 ( Page
3 ( Page
3 , fromContext
4 , fromContext
4 , getValue
5 , getValue
5 , getBody
6 , getBody
6 , readPage
7 , readPage
7− , splitAtDelimiters
8 ) where
8 ) where
9
9
10import qualified Data.Map as M
10import qualified Data.Map as M
src/Text/Hakyll/Render.hs+2
@@ -1,3 +1,5 @@
1+-- | Module containing rendering functions. All these functions are used to
2+-- render files to the @_site@ directory.
1module Text.Hakyll.Render
3module Text.Hakyll.Render
2 ( depends
4 ( depends
3 , render
5 , render
src/Text/Hakyll/Util.hs+4−1
@@ -1,3 +1,4 @@
1+-- | Miscellaneous text manipulation functions.
1module Text.Hakyll.Util
2module Text.Hakyll.Util
2 ( trim
3 ( trim
3 , stripHTML
4 , stripHTML
@@ -26,6 +27,8 @@ stripHTML str = let (beforeTag, rest) = break (== '<') str
26-- | Make a HTML link.
27-- | Make a HTML link.
27--
28--
28-- > link "foo" "bar.html" == "<a href='bar.html'>foo</a>"
29-- > link "foo" "bar.html" == "<a href='bar.html'>foo</a>"
29−link :: String -> String -> String
30+link :: String -- ^ Link text.
31+ -> String -- ^ Link destination.
32+ -> String
30link text destination = "<a href=\"" ++ destination ++ "\">"
33link text destination = "<a href=\"" ++ destination ++ "\">"
31 ++ text ++ "</a>"
34 ++ text ++ "</a>"