Bump jsoup (#91)

Author: borkdude

deps.edn

@@ -1,7 +1,7 @@
 {:paths ["src/clj" "src/cljc" "src/cljs"]
  :deps
  {org.clojure/clojure {:mvn/version "1.11.1"}
-  org.jsoup/jsoup {:mvn/version "1.14.3"}} ;hold back jsoup upgrade due to graal incompatibility
+  org.jsoup/jsoup {:mvn/version "1.19.1"}}
  :aliases
  {:test {:extra-paths ["test/cljc"]}
   :cljs {:extra-deps {org.clojure/clojurescript {:mvn/version "1.11.60"}}}

project.clj

@@ -11,7 +11,7 @@
 
   :dependencies [[org.clojure/clojure "1.11.1"]
                  [org.clojure/clojurescript "1.11.60" :scope "provided"]
-                 [org.jsoup/jsoup "1.15.2"]]
+                 [org.jsoup/jsoup "1.19.1"]]
 
   :source-paths ["src/clj" "src/cljc" "src/cljs"]
 

src/clj/hickory/core.clj

@@ -7,6 +7,8 @@
             DocumentType Element TextNode XmlDeclaration]
            [org.jsoup.parser Tag Parser]))
 
+(set! *warn-on-reflection* true)
+
 (defn- end-or-recur [as-fn loc data & [skip-child?]]
   (let [new-loc (-> loc (zip/replace data) zip/next (cond-> skip-child? zip/next))]
     (if (zip/end? new-loc)
@@ -68,9 +70,10 @@
   DocumentType
   (as-hiccup
     ([this] (trampoline as-hiccup this (hzip/hiccup-zip this)))
-    ([this loc] (end-or-recur as-hiccup loc (utils/render-doctype (.attr this "name")
-                                                                  (.attr this "publicid")
-                                                                  (.attr this "systemid")))))
+    ([this loc]
+     (end-or-recur as-hiccup loc (utils/render-doctype (.name this)
+                                                       (.publicId this)
+                                                       (.systemId this)))))
   Element
   (as-hiccup
     ([this] (trampoline as-hiccup this (hzip/hiccup-zip this)))

test/cljc/hickory/test/core.cljc

@@ -16,7 +16,8 @@
 
   (is (= {:type :document,
           :content [{:type :document-type,
-                     :attrs {:name "html", :publicid "", :systemid ""}}
+                     :attrs {:name "html", :publicid "", :systemid ""
+                             #?@(:clj [:#doctype "html"])}}
                     {:type :element,
                      :attrs nil,
                      :tag :html,
@@ -57,7 +58,8 @@
 
   (is (= {:type :document,
           :content [{:type :document-type,
-                     :attrs {:name "html", :publicid "", :systemid ""}}
+                     :attrs {:name "html", :publicid "", :systemid ""
+                             #?@(:clj [:#doctype "html"])}}
                     {:type :element,
                      :attrs nil,
                      :tag :html,