                                 (-> a-tag
                                     (.getAttributes)
                                     (.getNamedItem "href")
-                                    (.getValue)))
+                                    (.getValue)
+                                    (StringEscapeUtils/unescapeHtml)))
                                "javascript")
                               (not
                                (some

                                  (-> a-tag
                                      (.getAttributes)
                                      (.getNamedItem "href")
                                      (.getValue)))
                                 "javascript")
                                (not
                                 (some

                                  (-> a-tag
                                      (.getAttributes)
                                      (.getNamedItem "href")
                                      (.getValue)
                                      (StringEscapeUtils/unescapeHtml)))
                                 "javascript")
                                (not
                                 (some
