diff options
Diffstat (limited to 'src/Text/Pandoc/Writers/Docx.hs')
| -rw-r--r-- | src/Text/Pandoc/Writers/Docx.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/Docx.hs b/src/Text/Pandoc/Writers/Docx.hs index 27bb4117b..36e20fc61 100644 --- a/src/Text/Pandoc/Writers/Docx.hs +++ b/src/Text/Pandoc/Writers/Docx.hs @@ -1293,8 +1293,8 @@ setLTR x = do if isRTL then do paraProps <- asks envParaProperties textProps <- asks envTextProperties - let paraProps' = filter (\e -> (qName . elName) e /= "w:bidi") paraProps - textProps' = filter (\e -> (qName . elName) e /= "w:rtl") textProps + let paraProps' = filter (\e -> (qName . elName) e /= "bidi") paraProps + textProps' = filter (\e -> (qName . elName) e /= "rtl") textProps flip local x $ \env -> env { envRTL = False , envParaProperties = paraProps' , envTextProperties = textProps' |