Bump version number, minor stuff

app/Main.hs

@@ -31,7 +31,10 @@ handle style = fromMaybe (const help) (lookup style styles) . T.dropWhileEnd isS
 -- |Help string.
 help :: T.Text
 help = T.unlines [
-    " - Mock 3.0.0 - ",
+    " ╔════════════════════╗",
+    " ║     Mock 3.3.0     ║",
+    " ╚════════════════════╝",
+    "",
     "A Great PrOgrAM tO TRANsFoRM TEXt, wRiTten iN HaSKeLL.",
     "By Nicolas Lenz. Free and open source under the WTFPL.",
     "Webpage (source code, issues, pull requests): https://git.eisfunke.com/software/mock",
@@ -40,4 +43,8 @@ help = T.unlines [
     "Help:  mock --help",
     "",
     "Styles: ",
-    T.intercalate "\n" (map (\(name, _) -> T.concat ["  - ", name, ": ", styleHelp name]) styles)]
+    T.intercalate "\n" styleHelps] where
+        styleHelps = map
+            (\(name, _) -> T.concat ["  - ", name, ": ", T.replicate (maxNameLength - T.length name) " " , styleHelp name])
+            styles
+        maxNameLength = maximum . map (T.length . fst) $ styles

mock.cabal

@@ -4,10 +4,10 @@ cabal-version: 2.2
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 72ef52c2162b8348d893d8b683bbf0a315e414192ee8d68cc9bf5dbb8f9c45d4
+-- hash: 25216876ead15fc7d80c86db52d327284f1e1e11704a736cec1d15280cc22ed3
 
 name:           mock
-version:        3.2.1
+version:        3.3.0
 synopsis:       GrEAt HAskeLL PrOGRaM to trANsForm tEXT
 description:    Please see the README at <https://git.eisfunke.com/software/mock#readme>
 category:       String

package.yaml

 name:                mock
-version:             3.2.1
+version:             3.3.0
 license:             WTFPL
 git:                 "https://git.eisfunke.com/software/mock"
 author:              "Nicolas Lenz"

src/Mock/Help.hs

@@ -7,18 +7,18 @@ import Data.Text (Text)
 
 styleHelp :: Text -> Text
 styleHelp styleName = case styleName of
-    "random" -> "   Flips lowercase characters pseudo-randomly into uppercase letters."
+    "random" -> "Flips lowercase characters pseudo-randomly into uppercase letters."
     "alternate" -> "Flips every second letter into an uppercase one, starting with the second character."
-    "space" -> "    Inserts a  s p a c e  between every two characters."
-    "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."
-    "upper" -> "    Turns all characters into UPPERCASE ones."
-    "lower" -> "    Turns all characters into lowercase ones."
-    "double" -> "   Turns characters (latin letters and numbers) into their double-struck variants (𝕖𝕩𝕒𝕞𝕡𝕝𝕖). Also known as blackboard bold."
-    "dedouble" -> " Turns double-struck characters (like from the \"double\" style) back into normal ones."
-    "cc" -> "       Replaces all occurences of lowercase \"c\", \"ck\" and \"k\" with \"cc\"."
-    "b" -> "        Replaces all occurences of Bs (lower- and uppercase) with B-button emojis (🅱)."
-    "square" -> "   Shows the input spaced in the first line and the tail of the input lined afterwards."
-    "strike" -> "   Turns the input into strikethrough using Unicode combinators (e̶x̶a̶m̶p̶l̶e̶)."
+    "space" -> "Inserts a  s p a c e  between every two characters."
+    "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."
+    "upper" -> "Turns all characters into UPPERCASE ones."
+    "lower" -> "Turns all characters into lowercase ones."
+    "double" -> "Turns characters (latin letters and numbers) into their double-struck variants (𝕖𝕩𝕒𝕞𝕡𝕝𝕖). Also known as blackboard bold."
+    "dedouble" -> "Turns double-struck characters (like from the \"double\" style) back into normal ones."
+    "cc" -> "Replaces all occurences of lowercase \"c\", \"ck\" and \"k\" with \"cc\"."
+    "b" -> "Replaces all occurences of Bs (lower- and uppercase) with B-button emojis (🅱)."
+    "square" -> "Shows the input spaced in the first line and the tail of the input lined afterwards."
+    "strike" -> "Turns the input into strikethrough using Unicode combinators (e̶x̶a̶m̶p̶l̶e̶)."
     _ -> "No documentation available."