fix: panel one

it's a compromise. we don't print the separator line (`---`) any more,
but also you have to enter the blank lines you want in the source file
pull/1/head
dozens 2021-08-29 15:43:24 -06:00
parent 3d4c071864
commit 7381537f12
2 changed files with 12 additions and 5 deletions

View File

@ -144,15 +144,18 @@ text:
~~~ ~~~
[ [
get-line get-line
dup s:put-wrapped dup '--- s:eq? not [
dup s:put-wrapped nl
] if
'--- s:eq? not '--- s:eq? not
dup [ nl nl ] if
] while ] while
nl fences nl nl
~~~ ~~~
TODO: don't print `---` line. wrap it up:
~~~
fences nl nl
~~~
## Panel 2 ## Panel 2

View File

@ -1,5 +1,9 @@
ya see, some people go real fast ya see, some people go real fast ya see, some people go real fast ya see, some people go real fast ya see, some people go real fast
and other people they go real slow and other people they go real slow
yeah that's it doncha know
--- ---
yeah that's the real root cause of most workplace conflict yeah that's the real root cause of most workplace conflict
ayup ayup
okay that's it bye