diff --git a/quad/quadwriter/markup.rkt b/quad/quadwriter/markup.rkt
index 457a4f88..3bdfe191 100644
--- a/quad/quadwriter/markup.rkt
+++ b/quad/quadwriter/markup.rkt
@@ -15,4 +15,6 @@
   (define read-syntax
     (make-read-syntax 'quadwriter/markup
                       (λ (path-string ip)
-                        (detect-paragraphs (syntax->datum (quad-at-reader path-string ip)))))))
\ No newline at end of file
+                        (decode-paragraphs
+                         (syntax->datum (quad-at-reader path-string ip))
+                         #:force? #true)))))
\ No newline at end of file