From 7381537f1288d6da252920e9f9ca6d721425c7e9 Mon Sep 17 00:00:00 2001 From: dozens Date: Sun, 29 Aug 2021 15:43:24 -0600 Subject: [PATCH] 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 --- bin/toad.md | 11 +++++++---- src/00001.txt | 6 +++++- 2 files changed, 12 insertions(+), 5 deletions(-) diff --git a/bin/toad.md b/bin/toad.md index e048300..22e23e8 100644 --- a/bin/toad.md +++ b/bin/toad.md @@ -144,15 +144,18 @@ text: ~~~ [ get-line - dup s:put-wrapped + dup '--- s:eq? not [ + dup s:put-wrapped nl + ] if '--- s:eq? not - dup [ nl nl ] if ] while -nl fences nl nl ~~~ -TODO: don't print `---` line. +wrap it up: +~~~ +fences nl nl +~~~ ## Panel 2 diff --git a/src/00001.txt b/src/00001.txt index 37e2dca..7b68747 100644 --- a/src/00001.txt +++ b/src/00001.txt @@ -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 + +yeah that's it doncha know --- yeah that's the real root cause of most workplace conflict ayup +okay that's it bye