git.iko.soy/typeable/pandoc
on master help sign in
Allow the URI in a RST hyperlink target to start on the line

after the reference key. git-svn-id: https://pandoc.googlecode.com/svn/trunk@525 788f1e2b-df1e-0410-8736-df70ead52e1b

commitca93680f72e8ede39f14147d34e5968ffc8fff60 authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> dateMon 12 Feb 2007, 02:46 (20 years ago) parentdf03ca2
1 file changed+3
compare with master
unifiedsplit
src/Text/Pandoc/Readers/RST.hs+3
src/Text/Pandoc/Readers/RST.hs+3
@@ -508,6 +508,7 @@ imageKey = try (do
508508anonymousKey = try (do
509509 choice [string ".. __:", string "__"]
510510 skipSpaces
511+ option ' ' newline
511512 src <- manyTill anyChar newline
512513 state <- getState
513514 return (Key [Str "_"] (Src (removeLeadingTrailingSpace src) "")))
@@ -516,6 +517,7 @@ regularKeyQuoted = try (do
516517 string ".. _`"
517518 ref <- manyTill inline (string "`:")
518519 skipSpaces
520+ option ' ' newline
519521 src <- manyTill anyChar newline
520522 return (Key (normalizeSpaces ref)
521523 (Src (removeLeadingTrailingSpace src) "")))
@@ -524,6 +526,7 @@ regularKey = try (do
524526 string ".. _"
525527 ref <- manyTill inline (char ':')
526528 skipSpaces
529+ option ' ' newline
527530 src <- manyTill anyChar newline
528531 return (Key (normalizeSpaces ref)
529532 (Src (removeLeadingTrailingSpace src) "")))