git.iko.soy/hakyll
on master help sign in
Add string utility module
4981cfbJasper Van der Jeugt
src/Hakyll/Web/Util/String.hsnew file+14
compare with master
unifiedsplit
@@ -0,0 +1,14 @@
1+-- | Miscellaneous string manipulation functions.
2+--
3+module Hakyll.Web.Util.String
4+ ( trim
5+ ) where
6+
7+import Data.Char (isSpace)
8+
9+-- | Trim a string (drop spaces, tabs and newlines at both sides).
10+--
11+trim :: String -> String
12+trim = reverse . trim' . reverse . trim'
13+ where
14+ trim' = dropWhile isSpace