From 74695509471a9b885dacb5aee46b5a4e42064325 Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Mon, 6 Jul 2020 15:39:29 -0700
Subject: [PATCH] don't add auto line breaks (fixes #64)

---
 quad/quadwriter/markup.rkt | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/quad/quadwriter/markup.rkt b/quad/quadwriter/markup.rkt
index 02cebe82..1a7b6789 100644
--- a/quad/quadwriter/markup.rkt
+++ b/quad/quadwriter/markup.rkt
@@ -8,11 +8,7 @@
          q)
 
 (make-module-begin
- (λ (exprs)
-   (doc-proc
-    (decode-paragraphs exprs
-                       #:force? #true
-                       #:linebreak-proc (λ (x) (decode-linebreaks x '(line-break)))))))
+ (λ (exprs) (doc-proc (decode-paragraphs exprs #:force? #true))))
 
 (module reader racket/base
   (require "lang-helper.rkt")