@@ -405,7 +405,7 @@ satisfyTok f =
405 | otherwise = Nothing
405 | otherwise = Nothing
406 updatePos :: SourcePos -> Tok -> [Tok] -> SourcePos
406 updatePos :: SourcePos -> Tok -> [Tok] -> SourcePos
407 updatePos _spos _ (Tok pos _ _ : _) = pos
407 updatePos _spos _ (Tok pos _ _ : _) = pos
408− updatePos spos _ [] = spos
408+ updatePos spos _ [] = incSourceColumn spos 1
410doMacros :: PandocMonad m => Int -> LP m ()
410doMacros :: PandocMonad m => Int -> LP m ()
411doMacros n = do
411doMacros n = do