Commit 72ae5bf3 authored by Nicolas Lenz's avatar Nicolas Lenz

Add wordlines style

parent 235184ee
......@@ -30,6 +30,7 @@ styles = [
("space2", letterspace 2),
("space3", letterspace 3),
("lines", T.intersperse '\n'),
("wordlines", T.concat . intersperse "\n" . T.words),
("square", mockSquare)]
-- |Transforms a String into uppercase where the corresponding list is True. For False the String isn't changed.
......
......@@ -14,6 +14,7 @@ styleHelp styleName = case styleName of
"space2" -> "Inserts two s p a c e s between every two characters."
"space3" -> "Inserts three s p a c e s between every two characters."
"lines" -> "Puts each character on a single line."
"wordlines" -> "Puts each word on a single line."
"upper" -> "Turns all characters into UPPERCASE ones."
"lower" -> "Turns all characters into lowercase ones."
"cyrillic" -> "Turns the text into a stereotypical fake russian looking variant."
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment