Browse Source

Bump version number, minor stuff

Nicolas Lenz 2 months ago
parent
commit
0ee2b62b98
4 changed files with 25 additions and 17 deletions
  1. 9
    2
      app/Main.hs
  2. 2
    1
      mock.cabal
  3. 1
    1
      package.yaml
  4. 13
    13
      src/Mock/Help.hs

+ 9
- 2
app/Main.hs View File

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

+ 2
- 1
mock.cabal View File

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

+ 1
- 1
package.yaml View File

@@ -1,5 +1,5 @@
1 1
 name:                mock
2
-version:             3.2.1
2
+version:             3.3.0
3 3
 license:             WTFPL
4 4
 git:                 "https://git.eisfunke.com/software/mock"
5 5
 author:              "Nicolas Lenz"

+ 13
- 13
src/Mock/Help.hs View File

@@ -7,18 +7,18 @@ import Data.Text (Text)
7 7
 
8 8
 styleHelp :: Text -> Text
9 9
 styleHelp styleName = case styleName of
10
-    "random" -> "   Flips lowercase characters pseudo-randomly into uppercase letters."
10
+    "random" -> "Flips lowercase characters pseudo-randomly into uppercase letters."
11 11
     "alternate" -> "Flips every second letter into an uppercase one, starting with the second character."
12
-    "space" -> "    Inserts a  s p a c e  between every two characters."
13
-    "space2" -> "   Inserts two   s  p  a  c  e  s   between every two characters."
14
-    "space3" -> "   Inserts three    s   p   a   c   e   s    between every two characters."
15
-    "lines" -> "    Puts each character on a single line."
16
-    "upper" -> "    Turns all characters into UPPERCASE ones."
17
-    "lower" -> "    Turns all characters into lowercase ones."
18
-    "double" -> "   Turns characters (latin letters and numbers) into their double-struck variants (𝕖𝕩𝕒𝕞𝕡𝕝𝕖). Also known as blackboard bold."
19
-    "dedouble" -> " Turns double-struck characters (like from the \"double\" style) back into normal ones."
20
-    "cc" -> "       Replaces all occurences of lowercase \"c\", \"ck\" and \"k\" with \"cc\"."
21
-    "b" -> "        Replaces all occurences of Bs (lower- and uppercase) with B-button emojis (🅱)."
22
-    "square" -> "   Shows the input spaced in the first line and the tail of the input lined afterwards."
23
-    "strike" -> "   Turns the input into strikethrough using Unicode combinators (e̶x̶a̶m̶p̶l̶e̶)."
12
+    "space" -> "Inserts a  s p a c e  between every two characters."
13
+    "space2" -> "Inserts two   s  p  a  c  e  s   between every two characters."
14
+    "space3" -> "Inserts three    s   p   a   c   e   s    between every two characters."
15
+    "lines" -> "Puts each character on a single line."
16
+    "upper" -> "Turns all characters into UPPERCASE ones."
17
+    "lower" -> "Turns all characters into lowercase ones."
18
+    "double" -> "Turns characters (latin letters and numbers) into their double-struck variants (𝕖𝕩𝕒𝕞𝕡𝕝𝕖). Also known as blackboard bold."
19
+    "dedouble" -> "Turns double-struck characters (like from the \"double\" style) back into normal ones."
20
+    "cc" -> "Replaces all occurences of lowercase \"c\", \"ck\" and \"k\" with \"cc\"."
21
+    "b" -> "Replaces all occurences of Bs (lower- and uppercase) with B-button emojis (🅱)."
22
+    "square" -> "Shows the input spaced in the first line and the tail of the input lined afterwards."
23
+    "strike" -> "Turns the input into strikethrough using Unicode combinators (e̶x̶a̶m̶p̶l̶e̶)."
24 24
     _ -> "No documentation available."

Loading…
Cancel
Save