aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Jira.hs
diff options
context:
space:
mode:
authorAlbert Krewinkel <albert@zeitkraut.de>2020-02-07 10:15:57 +0100
committerAlbert Krewinkel <albert@zeitkraut.de>2020-02-07 10:17:24 +0100
commit6cd77d4c638012be63d66882403804aa28feb6ed (patch)
treeea1841989db394ae931780fbbca3305fe0f021c8 /src/Text/Pandoc/Readers/Jira.hs
parent60a3158bf9b6f4d16bb5fc6cac61b5c305ad40e3 (diff)
downloadpandoc-6cd77d4c638012be63d66882403804aa28feb6ed.tar.gz
Resolve HLint warnings
All warnings are either fixed or, if more appropriate, HLint is configured to ignore them. HLint suggestions remain. * Ignore "Use camelCase" warnings in Lua and legacy code * Fix or ignore remaining HLint warnings * Remove redundant brackets * Remove redundant `return`s * Remove redundant as-pattern * Fuse mapM_/map * Use `.` to shorten code * Remove redundant `fmap` * Remove unused LANGUAGE pragmas * Hoist `not` in Text.Pandoc.App * Use fewer imports for `Text.DocTemplates` * Remove redundant `do`s * Remove redundant `$`s * Jira reader: remove unnecessary parentheses
Diffstat (limited to 'src/Text/Pandoc/Readers/Jira.hs')
-rw-r--r--src/Text/Pandoc/Readers/Jira.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Jira.hs b/src/Text/Pandoc/Readers/Jira.hs
index 362693af9..46077a4a9 100644
--- a/src/Text/Pandoc/Readers/Jira.hs
+++ b/src/Text/Pandoc/Readers/Jira.hs
@@ -106,8 +106,8 @@ rowToBlocksList (Jira.Row cells) =
splitIntoHeaderAndBody :: [Jira.Row] -> (Jira.Row, [Jira.Row])
splitIntoHeaderAndBody [] = (Jira.Row [], [])
splitIntoHeaderAndBody rows@(first@(Jira.Row cells) : rest) =
- let isHeaderCell (Jira.HeaderCell{}) = True
- isHeaderCell (Jira.BodyCell{}) = False
+ let isHeaderCell Jira.HeaderCell{} = True
+ isHeaderCell Jira.BodyCell{} = False
in if all isHeaderCell cells
then (first, rest)
else (Jira.Row [], rows)