diff options
Diffstat (limited to 'src/Text/Hakyll/Internal')
| -rw-r--r-- | src/Text/Hakyll/Internal/CompressCss.hs (renamed from src/Text/Hakyll/Internal/CompressCSS.hs) | 8 | ||||
| -rw-r--r-- | src/Text/Hakyll/Internal/Render.hs | 2 |
2 files changed, 5 insertions, 5 deletions
diff --git a/src/Text/Hakyll/Internal/CompressCSS.hs b/src/Text/Hakyll/Internal/CompressCss.hs index 7d52bef..4b19984 100644 --- a/src/Text/Hakyll/Internal/CompressCSS.hs +++ b/src/Text/Hakyll/Internal/CompressCss.hs @@ -1,7 +1,7 @@ -- | Module used for CSS compression. The compression is currently in a simple -- state, but would typically reduce the number of bytes by about 25%. -module Text.Hakyll.Internal.CompressCSS - ( compressCSS +module Text.Hakyll.Internal.CompressCss + ( compressCss ) where import Data.List (isPrefixOf) @@ -9,8 +9,8 @@ import Data.List (isPrefixOf) import Text.Hakyll.Regex (substituteRegex) -- | Compress CSS to speed up your site. -compressCSS :: String -> String -compressCSS = compressSeparators +compressCss :: String -> String +compressCss = compressSeparators . stripComments . compressWhitespace diff --git a/src/Text/Hakyll/Internal/Render.hs b/src/Text/Hakyll/Internal/Render.hs index a3d2d9b..167c58a 100644 --- a/src/Text/Hakyll/Internal/Render.hs +++ b/src/Text/Hakyll/Internal/Render.hs @@ -65,4 +65,4 @@ writePage page = do liftIO $ writeFile destination $ finalSubstitute (fromString $ getBody page) context where - url = getURL page + url = getUrl page |