diff options
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Readers/Docx/Parse/Styles.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Readers/Docx/Parse/Styles.hs b/src/Text/Pandoc/Readers/Docx/Parse/Styles.hs index bb28b3009..df942579a 100644 --- a/src/Text/Pandoc/Readers/Docx/Parse/Styles.hs +++ b/src/Text/Pandoc/Readers/Docx/Parse/Styles.hs @@ -310,9 +310,8 @@ getIndentation ns el = do , rightParIndent = findAttrByName ns "w" "right" indElement <|> findAttrByName ns "w" "end" indElement >>= stringToInteger - , hangingParIndent = (findAttrByName ns "w" "hanging" indElement >>= stringToInteger) <|> - fmap negate - (findAttrByName ns "w" "firstLine" indElement >>= stringToInteger) + , hangingParIndent = findAttrByName ns "w" "hanging" indElement >>= + stringToInteger } getElementStyleName :: Coercible T.Text a => NameSpaces -> Element -> Maybe a |