Commit 6bf1cb73 authored by Nicolas Lenz's avatar Nicolas Lenz
Browse files

Fix #7

parent 3ef77978
......@@ -4,10 +4,10 @@ cabal-version: 2.2
--
-- see: https://github.com/sol/hpack
--
-- hash: dbb50addd67df50c61803bb90560fb8c48300322a58da40dccf6f166926e29ab
-- hash: c163d71c387a66e9f2b69128f77418f0edb7d266751fbe7ec2aa40443511d5d0
name: mock
version: 3.2.0
version: 3.2.1
synopsis: GrEAt HAskeLL PrOGRaM to trANsForm tEXT
description: Please see the README at <https://git.eisfunke.com/software/mock#readme>
category: String
......
name: mock
version: 3.2.0
version: 3.2.1
license: WTFPL
git: "https://git.eisfunke.com/software/mock"
author: "Nicolas Lenz"
......
......@@ -71,7 +71,7 @@ mockB = T.replace "b" "🅱️" . T.replace "B" "🅱️"
-- |Makes a square from a string.
mockSquare :: Text -> Text
mockSquare text = T.concat [T.intersperse ' ' text, "\n", T.intercalate "\n" (T.chunksOf 1 text)]
mockSquare text = T.concat [T.intersperse ' ' text, "\n", T.intercalate "\n" (T.chunksOf 1 $ T.tail text)]
-- |Uses Unicode U+0336 to let a text look struck through.
strikethrough :: Text -> Text
......
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