     (mc/stream-to-string
      {:text/html html})))
 
-(defn make-html [html]
-  (HtmlString. html))
+(defn html [html-str]
+  (HtmlString. html-str))
+
+(defn ^:deprecated make-html
+  [html-str]
+  (html html-str))
 
 (defrecord HiccupHTML [html-data]
 

    (mc/stream-to-string
     {:text/latex latex})))

(defn make-latex [latex]
  (Latex. latex))


;; Markdown

    (mc/stream-to-string
     {:text/markdown markdown})))

(defn markdown [markdown-str]
  (Markdown. markdown-str))

(defn ^:deprecated make-markdown
  [markdown-str]
  (markdown markdown-str))
