git.iko.soy/typeable/pandoc
on master help sign in
Docx reader: Fix bug in character styles.
9969b2eJesse Rosenthal
src/Text/Pandoc/Readers/Docx.hs+2−2
compare with master
unifiedsplit
@@ -242,14 +242,14 @@ runStyleToTransform rPr
242 , s `elem` emphStyles =
242 , s `elem` emphStyles =
243 let rPr' = rPr{rStyle = Nothing, isItalic = Nothing}
243 let rPr' = rPr{rStyle = Nothing, isItalic = Nothing}
244 in
244 in
245− case isItalic rPr' of
245+ case isItalic rPr of
246 Just False -> runStyleToTransform rPr'
246 Just False -> runStyleToTransform rPr'
247 _ -> emph . (runStyleToTransform rPr')
247 _ -> emph . (runStyleToTransform rPr')
248 | Just s <- rStyle rPr
248 | Just s <- rStyle rPr
249 , s `elem` strongStyles =
249 , s `elem` strongStyles =
250 let rPr' = rPr{rStyle = Nothing, isBold = Nothing}
250 let rPr' = rPr{rStyle = Nothing, isBold = Nothing}
251 in
251 in
252− case isItalic rPr' of
252+ case isBold rPr of
253 Just False -> runStyleToTransform rPr'
253 Just False -> runStyleToTransform rPr'
254 _ -> strong . (runStyleToTransform rPr')
254 _ -> strong . (runStyleToTransform rPr')
255 | Just True <- isItalic rPr =
255 | Just True <- isItalic rPr =