git.iko.soy/typeable/pandoc
on master help sign in
Main (tabFilter):

Treat '\r' at end of line as newline (in addition to '\r\n' and '\n'). git-svn-id: https://pandoc.googlecode.com/svn/trunk@1027 788f1e2b-df1e-0410-8736-df70ead52e1b

commit87fb10a316aaed3a1922708ee72293d3525c7bb4 authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> dateTue 18 Sep 2007, 06:48 (19 years ago) parentf8eac5b
1 file changed+2−1
src/Main.hs+2−1
src/Main.hs+2−1
@@ -447,8 +447,9 @@ main = do
447447
448448 let tabFilter _ [] = ""
449449 tabFilter _ ('\n':xs) = '\n':(tabFilter tabStop xs)
450− tabFilter _ ('\r':'\n':xs) = '\n':(tabFilter tabStop xs)
451450 -- remove DOS line endings
451+ tabFilter _ ('\r':'\n':xs) = '\n':(tabFilter tabStop xs)
452+ tabFilter _ ('\r':xs) = '\n':(tabFilter tabStop xs)
452453 tabFilter spsToNextStop ('\t':xs) =
453454 if preserveTabs
454455 then '\t':(tabFilter tabStop xs)