X-Git-Url: http://gitweb.michael.orlitzky.com/?p=dead%2Fhalcyon.git;a=blobdiff_plain;f=src%2FStringUtils.hs;h=f9d7dfc9cf8ae4b08c05f8f9dbd21ec52fac1230;hp=b7d291c229acdc96f777f8b60078fbd991d3c0cd;hb=9b6d95a82745ced2a58d9bc4ded555ee36b36673;hpb=81f6cb2ec955695d8d1a4619dab69e8fa4b3fb27

diff --git a/src/StringUtils.hs b/src/StringUtils.hs
index b7d291c..f9d7dfc 100644
--- a/src/StringUtils.hs
+++ b/src/StringUtils.hs
@@ -5,11 +5,13 @@ where
 import Test.HUnit
 
 
--- |Takes a list of strings, call them string1, string2, etc. and
--- numbers them like a list. So,
--- 1. string1
--- 2. string2
--- 3. etc.
+-- | Takes a list of strings, call them string1, string2, etc. and
+--   numbers them like a list. So,
+--
+--   1. string1
+--   2. string2
+--   3. etc.
+--
 listify :: [String] -> [String]
 listify items =
     zipWith (++) list_numbers items