diff options
Diffstat (limited to 'src/Text/Hakyll/Internal/CompressCss.hs')
| -rw-r--r-- | src/Text/Hakyll/Internal/CompressCss.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Hakyll/Internal/CompressCss.hs b/src/Text/Hakyll/Internal/CompressCss.hs index 4b19984..4a78791 100644 --- a/src/Text/Hakyll/Internal/CompressCss.hs +++ b/src/Text/Hakyll/Internal/CompressCss.hs @@ -29,8 +29,8 @@ stripComments :: String -> String stripComments [] = [] stripComments str | isPrefixOf "/*" str = stripComments $ eatComments $ drop 2 str - | otherwise = head str : stripComments (tail str) + | otherwise = head str : stripComments (drop 1 str) where eatComments str' | null str' = [] | isPrefixOf "*/" str' = drop 2 str' - | otherwise = eatComments $ tail str' + | otherwise = eatComments $ drop 1 str' |