@@ -1070,8 +1070,8 @@ inlineToOpenXML opts (Note bs) = do
10701070 [ mknode "w:rPr" [] footnoteStyle
10711071 , mknode "w:footnoteRef" [] () ]
10721072 let notemarkerXml = RawInline (Format "openxml") $ ppElement notemarker
1073− let insertNoteRef (Plain ils : xs) = Plain (notemarkerXml : ils) : xs
1074− insertNoteRef (Para ils : xs) = Para (notemarkerXml : ils) : xs
1073+ let insertNoteRef (Plain ils : xs) = Plain (notemarkerXml : Space : ils) : xs
1074+ insertNoteRef (Para ils : xs) = Para (notemarkerXml : Space : ils) : xs
10751075 insertNoteRef xs = Para [notemarkerXml] : xs
10761076 oldListLevel <- gets stListLevel
10771077 oldParaProperties <- gets stParaProperties