summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/guile/skribilo/reader/outline.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/guile/skribilo/reader/outline.scm b/src/guile/skribilo/reader/outline.scm
index 8c48293..9ff9a4a 100644
--- a/src/guile/skribilo/reader/outline.scm
+++ b/src/guile/skribilo/reader/outline.scm
@@ -230,7 +230,7 @@ takes a string and returns a list."
(let loop ((line line)
(result '()))
(if (or (eof-object? line) (empty-line? line))
- (cons 'p result)
+ (cons 'p (list result))
(loop (read-line port)
(let ((line (line-proc line)))
(append-trees result line "\n"))))))