git.iko.soy/typeable/pandoc
on master help sign in
Docx reader: Fix hdr handling in block norm

`blockNormalize` previously forgot to account for the case in which a Header's inlines did not start with a space.

commit7fd48b30e0a6e1e3c02a2b66c76118d10c02636f authorJesse Rosenthal <jrosenthal@jhu.edu> dateFri 20 Jun 2014, 09:30 (12 years ago) parent557b302
1 file changed+2
src/Text/Pandoc/Readers/Docx.hs+2
src/Text/Pandoc/Readers/Docx.hs+2
@@ -157,6 +157,8 @@ blockNormalize (Para (Space : ils)) = blockNormalize (Para ils)
157157blockNormalize (Para ils) = Para $ strNormalize ils
158158blockNormalize (Header n attr (Space : ils)) =
159159 blockNormalize $ Header n attr ils
160+blockNormalize (Header n attr ils) =
161+ Header n attr $ strNormalize ils
160162blockNormalize (Table (Space : ils) align width hdr cells) =
161163 blockNormalize $ Table ils align width hdr cells
162164blockNormalize (Table ils align width hdr cells) =