From b9834e11fc72e7291d4b17323adf60e833d26e11 Mon Sep 17 00:00:00 2001
From: Frank Duncan <frank@consxy.com>
Date: Fri, 14 Jan 2022 09:18:15 -0600
Subject: [PATCH] Fix bug where multiline paragraphs weren't handled correction

---
 src/main/parse.lisp | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/main/parse.lisp b/src/main/parse.lisp
index 61f37e8..45fa179 100644
--- a/src/main/parse.lisp
+++ b/src/main/parse.lisp
@@ -139,7 +139,11 @@ DESCRIPTION:
    ((textp prev) (values (p prev) t)))))
 
 (defun default (text)
- (lambda (prev) (declare (ignore prev)) text))
+ (lambda (prev)
+  (if
+   (textp prev)
+   (values (as-text (format nil "~A ~A" (cadr prev) (cadr text))) t)
+   text)))
 
 (defun codefence (codetype)
  (lambda (prev)
-- 
2.25.1