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

add margin preset keywords for more typical choices

Browse source
This commit is contained in:
Gered 2017-04-02 16:54:33 -04:00
parent 8623a28514
commit be6cc84c90
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/clj_htmltopdf/options.clj
View file

@ -68,6 +68,13 @@
[{:keys [margin] :as page-options}] [{:keys [margin] :as page-options}]
(let [default-margin (get-in default-options [:page :margin])] (let [default-margin (get-in default-options [:page :margin])]
(cond (cond
(keyword? margin)
(case margin
:normal [[:margin default-margin]]
:narrow [[:margin "0.5in"]]
:moderate [[:margin "1.0in 0.75in"]]
:wide [[:margin "1.0in 2.0in"]])
(map? margin) (map? margin)
[[:margin-left (or (:left margin) default-margin)] [[:margin-left (or (:left margin) default-margin)]
[:margin-top (or (:top margin) default-margin)] [:margin-top (or (:top margin) default-margin)]