Add Web.Slack.Experimental.Blocks.italic. (#115)

MercuryTechnologies · Nov 28, 2022 · 232618c · 232618c
1 parent c57a2ec
commit 232618c
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/slack-web.cabal b/slack-web.cabal
@@ -1,6 +1,6 @@
 cabal-version: 2.2
 name: slack-web
-version: 0.5.0.0
+version: 0.5.0.1
 
 build-type: Simple
 

diff --git a/src/Web/Slack/Experimental/Blocks.hs b/src/Web/Slack/Experimental/Blocks.hs
@@ -8,6 +8,7 @@ module Web.Slack.Experimental.Blocks
     ticks,
     codeBlock,
     bold,
+    italic,
     newline,
     unorderedList,
     link,
@@ -105,6 +106,9 @@ codeBlock x = "```\n" <> x <> "\n```"
 bold :: SlackText -> SlackText
 bold x = "*" <> x <> "*"
 
+italic :: SlackText -> SlackText
+italic x = "_" <> x <> "_"
+
 newline :: SlackText -> SlackText
 newline x = "\n" <> x