git.iko.soy/typeable/pandoc
on master help sign in
Have Docx reader properly interpret tabs.
0e7d2dbJesse Rosenthal
src/Text/Pandoc/Readers/Docx.hs+2
@@ -134,10 +134,12 @@ codeDivs = ["SourceCode"]
134runElemToInlines :: RunElem -> [Inline]
134runElemToInlines :: RunElem -> [Inline]
135runElemToInlines (TextRun s) = strToInlines s
135runElemToInlines (TextRun s) = strToInlines s
136runElemToInlines (LnBrk) = [LineBreak]
136runElemToInlines (LnBrk) = [LineBreak]
137+runElemToInlines (Tab) = [Space]
137
138
138runElemToString :: RunElem -> String
139runElemToString :: RunElem -> String
139runElemToString (TextRun s) = s
140runElemToString (TextRun s) = s
140runElemToString (LnBrk) = ['\n']
141runElemToString (LnBrk) = ['\n']
142+runElemToString (Tab) = ['\t']
141
143
142runElemsToString :: [RunElem] -> String
144runElemsToString :: [RunElem] -> String
143runElemsToString = concatMap runElemToString
145runElemsToString = concatMap runElemToString