aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Odt/Arrows
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-07-02 18:30:37 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-07-02 18:30:37 +0300
commitf6dfb632ff38cc9dd5156297959ce8028fd766ea (patch)
treec16a81756274be455610456efd7a26a2280c6060 /src/Text/Pandoc/Readers/Odt/Arrows
parent732e66d4c4f5d6669bbeb76eb33906a27f5889f3 (diff)
downloadpandoc-f6dfb632ff38cc9dd5156297959ce8028fd766ea.tar.gz
Spellcheck comments
Diffstat (limited to 'src/Text/Pandoc/Readers/Odt/Arrows')
-rw-r--r--src/Text/Pandoc/Readers/Odt/Arrows/Utils.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Odt/Arrows/Utils.hs b/src/Text/Pandoc/Readers/Odt/Arrows/Utils.hs
index d3db3a9e2..9e8221248 100644
--- a/src/Text/Pandoc/Readers/Odt/Arrows/Utils.hs
+++ b/src/Text/Pandoc/Readers/Odt/Arrows/Utils.hs
@@ -100,7 +100,7 @@ liftA fun a = a >>^ fun
-- | Duplicate a value to subsequently feed it into different arrows.
-- Can almost always be replaced with '(&&&)', 'keepingTheValue',
-- or even '(|||)'.
--- Aequivalent to
+-- Equivalent to
-- > returnA &&& returnA
duplicate :: (Arrow a) => a b (b,b)
duplicate = arr $ join (,)
@@ -114,7 +114,7 @@ infixr 2 >>%
-- | Duplicate a value and apply an arrow to the second instance.
--- Aequivalent to
+-- Equivalent to
-- > \a -> duplicate >>> second a
-- or
-- > \a -> returnA &&& a