   (let [indent (re-find #"\s\s+" text)]
     (if indent
       [:indent {:width (count indent)}
-       (c.s/replace text (re-pattern indent) "")]
+       (c.s/replace text (re-pattern indent) " ")]
       [:str {} text])))
-
 
 (defn text->paragraph
   [text]

            "```" \newline)
       (ensure-trailing-newline <>)))


(defmethod render :block
  [[_ opts & text]]
  (-<> text

       (interpose "\n" <>)
       (apply str <>)))

(defmethod render :heading
  [[_ opts & text]]
  (str (apply str text) "\n"
       (str (apply str (repeat 80 \-)) \newline)))

(defmethod render :code
  [[_ {lang :lang :as opts} & text]]
