polished to work with Jaspersoft Studio version 6.6.0.final using Jas…

…perReports Library version 6.6.0

project.clj

@@ -1,4 +1,4 @@
-(defproject net.tbt-post/clj-jasper "0.0.2-dev"
+(defproject net.tbt-post/clj-jasper "0.0.2"
   :description "A Clojure library to work with Jasper Reports"
   :url "https://github.com/source-c/clj-jasper"
   :license {:name "MIT License"}
@@ -7,7 +7,9 @@
                  [net.sf.jasperreports/jasperreports "6.7.0"
                   :exclusions [com.lowagie/itext]]
                  [net.sf.jasperreports/jasperreports-fonts "6.0.0"]
-                 [com.lowagie/itext "4.2.2"]
+                 ;[com.lowagie/itext "4.2.2"]
+                 [com.lowagie/itext "2.1.7"]
+                 [net.sourceforge.barbecue/barbecue "1.5-beta1"]
 
                  ;; Loggers
                  ;; -------

src/clj_jasper/core.clj

@@ -26,13 +26,16 @@
 
 (def ^:dynamic *jr-templates-path* "reports")
 
-(defn data->report [{:keys [name data mtype filename ops]
+(defn template->object [name]
+  (let [template (some-> (format "%s/%s.jrxml" *jr-templates-path* name)
+                         io/resource
+                         io/file)]
+    (some-> template io/input-stream JasperCompileManager/compileReport)))
+
+(defn data->report [{:keys [name data mtype filename ops report]
                      :or   {mtype :pdf}}]
 
-  (let [template (-> (format "%s/%s.jrxml" *jr-templates-path* name)
-                     io/resource
-                     io/file)
-        report (-> template io/input-stream JasperCompileManager/compileReport)
+  (let [report (or report (template->object name))
         j-data (data->jr (or data {:empty true}))
         filled (JasperFillManager/fillReport
                  ^JasperReport report
@@ -42,5 +45,5 @@
                 :pdf (JasperExportManager/exportReportToPdf filled))]
 
     {:name (or filename (format "%s.%s" name (name mtype)))
-     :type (get mtype mime-types)
+     :type (get mime-types mtype)
      :file bytes}))