summaryrefslogtreecommitdiff
path: root/src/Text/Hakyll/Util.hs
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2010-01-09 21:40:31 +0100
committerJasper Van der Jeugt <jaspervdj@gmail.com>2010-01-09 21:40:31 +0100
commit73f6b1ab8cf3cb9468c547db6df1df9596f1470d (patch)
tree1d8b7205cc88388573c50798dd6e16effeb39ece /src/Text/Hakyll/Util.hs
parentcb3e3b119313145b5b79d46d2c40390ce9d9a51b (diff)
downloadhakyll-73f6b1ab8cf3cb9468c547db6df1df9596f1470d.tar.gz
Some changes to the regex interface, and version bump.
Diffstat (limited to 'src/Text/Hakyll/Util.hs')
-rw-r--r--src/Text/Hakyll/Util.hs7
1 files changed, 0 insertions, 7 deletions
diff --git a/src/Text/Hakyll/Util.hs b/src/Text/Hakyll/Util.hs
index 319bed4..018c404 100644
--- a/src/Text/Hakyll/Util.hs
+++ b/src/Text/Hakyll/Util.hs
@@ -1,12 +1,10 @@
module Text.Hakyll.Util
( trim
- , split
, stripHTML
, link
) where
import Data.Char (isSpace)
-import Text.Regex (splitRegex, mkRegex)
-- | Trim a string (drop spaces and tabs at both sides).
trim :: String -> String
@@ -23,11 +21,6 @@ stripHTML str = let (beforeTag, rest) = break (== '<') str
where tail' [] = []
tail' xs = tail xs
--- | Split a list at a certain element.
-split :: String -> String -> [String]
-split pattern = filter (not . null)
- . splitRegex (mkRegex pattern)
-
-- | Make a HTML link.
--
-- > link "foo" "bar.html" == "<a href='bar.html'>foo</a>"