gered/clj-htmltopdf
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

add default-options

Browse source
This commit is contained in:
Gered 2017-04-01 15:23:02 -04:00
parent 631e5fc1a4
commit a74fdd5ae6
1 changed files with 10 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/clj_htmltopdf/core.clj
View file

@ -37,10 +37,18 @@
(catch Exception ex (catch Exception ex
(throw (Exception. "Error parsing input as HTML5." ex))))) (throw (Exception. "Error parsing input as HTML5." ex)))))
(def default-options
{:logging? false
:base-uri ""
:include-base-css? true
:page {:size :letter
:orientation :portrait}})
(defn ->pdf (defn ->pdf
[in out & [options]] [in out & [options]]
(let [builder (PdfRendererBuilder.) (let [options (merge default-options options)
base-uri (str (or (:base-uri options) ".")) builder (PdfRendererBuilder.)
base-uri (str (:base-uri options))
html (read-html in) html (read-html in)
html-doc (parse-html5 html) html-doc (parse-html5 html)
output (->output-stream out)] output (->output-stream out)]