steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

allow horizontal lines in paragraphs if they start at the beginning of a line

db4
Doug Coleman 2008-09-24 22:39:38 -05:00
parent 5be907e857
commit 37130f911c
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/farkup/farkup-tests.factor
View File

@ -144,3 +144,9 @@ link-no-follow? off
[ "<p>[ factor { 1 2 3 }]</p>" ] [ "<p>[ factor { 1 2 3 }]</p>" ]
[ "[ factor { 1 2 3 }]" convert-farkup ] unit-test [ "[ factor { 1 2 3 }]" convert-farkup ] unit-test
[ "<p>paragraph\n<hr/></p>" ]
[ "paragraph\n___" convert-farkup ] unit-test
[ "<p>paragraph\n a ___ b</p>" ]
[ "paragraph\n a ___ b" convert-farkup ] unit-test

2
basis/farkup/farkup.factor
View File

@ -108,7 +108,7 @@ table = ((table-row nl => [[ first ]] )+ table-row? | table-row)
text = (!(nl | code | heading | inline-delimiter | table ).)+ text = (!(nl | code | heading | inline-delimiter | table ).)+
=> [[ >string ]] => [[ >string ]]
paragraph-item = (table | nl list | code | text | inline-tag | inline-delimiter)+ paragraph-item = (table | nl list | nl line | code | text | inline-tag | inline-delimiter)+
paragraph = ((paragraph-item nl => [[ first ]])+ nl+ => [[ first ]] paragraph = ((paragraph-item nl => [[ first ]])+ nl+ => [[ first ]]
| (paragraph-item nl)+ paragraph-item? | (paragraph-item nl)+ paragraph-item?
| paragraph-item) | paragraph-item)