From 17e887607075072bfa6de40cf9a9fcc4e6ffa8f4 Mon Sep 17 00:00:00 2001
From: gered <gered@blarg.ca>
Date: Sun, 2 Apr 2017 13:21:28 -0400
Subject: [PATCH] do not output page options <style> tag if explicitly set to
 nil

---
 src/clj_htmltopdf/options.clj | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/src/clj_htmltopdf/options.clj b/src/clj_htmltopdf/options.clj
index 5d693d1..498a8bc 100644
--- a/src/clj_htmltopdf/options.clj
+++ b/src/clj_htmltopdf/options.clj
@@ -66,8 +66,7 @@
 
 (defn inject-options-into-html!
   [^Document doc options]
-  (let [base-uri (->base-uri options)
-        head-tag (-> doc (.select "head") (.first))]
-    (append-page-options-style-tag! head-tag options)
+  (let [head-tag (-> doc (.select "head") (.first))]
+    (if (:page options) (append-page-options-style-tag! head-tag options))
     (if (:include-base-css? options) (append-base-css-link-tag! head-tag))
     doc))