git.iko.soy/typeable/pandoc
on master help sign in
RST reader: Add test for space-before-note.
f407b66Jesse Rosenthal
tests/Tests/Readers/RST.hs+9
compare with master
unifiedsplit
@@ -163,4 +163,13 @@ tests = [ "line block with blank line" =:
163 =?> para (codeWith ("", ["lhs", "haskell", "sourceCode"], []) "text")
163 =?> para (codeWith ("", ["lhs", "haskell", "sourceCode"], []) "text")
164 , "unknown role" =: ":unknown:`text`" =?> para (str "text")
164 , "unknown role" =: ":unknown:`text`" =?> para (str "text")
165 ]
165 ]
166+ , testGroup "footnotes"
167+ [ "remove space before note" =: unlines
168+ [ "foo [1]_"
169+ , ""
170+ , ".. [1]"
171+ , " bar"
172+ ] =?>
173+ (para $ "foo" <> (note $ para "bar"))
174+ ]
166 ]
175 ]