git.iko.soy/typeable/pandoc
on master help sign in
Docx writer: Change FigureWithCaption to CaptionedFigure (#3658)
b9185b0Ian
data/docx/word/styles.xml+2−2
compare with master
unifiedsplit
@@ -400,8 +400,8 @@
400 <w:name w:val="Figure" />
400 <w:name w:val="Figure" />
401 <w:basedOn w:val="Normal" />
401 <w:basedOn w:val="Normal" />
402 </w:style>
402 </w:style>
403− <w:style w:type="paragraph" w:customStyle="1" w:styleId="FigureWithCaption">
403+ <w:style w:type="paragraph" w:customStyle="1" w:styleId="CaptionedFigure">
404− <w:name w:val="Figure with Caption" />
404+ <w:name w:val="Captioned Figure" />
405 <w:basedOn w:val="Figure" />
405 <w:basedOn w:val="Figure" />
406 <w:pPr>
406 <w:pPr>
407 <w:keepNext />
407 <w:keepNext />
src/Text/Pandoc/Writers/Docx.hs+1−1
@@ -875,7 +875,7 @@ blockToOpenXML' opts (Para [Image attr alt (src,'f':'i':'g':':':tit)]) = do
875 let prop = pCustomStyle $
875 let prop = pCustomStyle $
876 if null alt
876 if null alt
877 then "Figure"
877 then "Figure"
878− else "FigureWithCaption"
878+ else "CaptionedFigure"
879 paraProps <- local (\env -> env { envParaProperties = prop : envParaProperties env }) (getParaProps False)
879 paraProps <- local (\env -> env { envParaProperties = prop : envParaProperties env }) (getParaProps False)
880 contents <- inlinesToOpenXML opts [Image attr alt (src,tit)]
880 contents <- inlinesToOpenXML opts [Image attr alt (src,tit)]
881 captionNode <- withParaProp (pCustomStyle "ImageCaption")
881 captionNode <- withParaProp (pCustomStyle "ImageCaption")