@@ -4,7 +4,7 @@ <modelVersion>4.0.0</modelVersion> <groupId>com.github.kyleburton</groupId> <artifactId>clj-xpath</artifactId> - <version>1.0.1</version> + <version>1.0.2</version> <packaging>jar</packaging> <name>Clojure Xpath Utilties</name> <description>Helper utilities for working with XPath from Clojure.</description> pom.xml @@ -14,6 +14,7 @@ (def *namespace-aware* (atom false)) +(def *default-encoding* "UTF-8") (defn throwf [& args] (throw (RuntimeException. (apply format args)))) @@ -45,7 +46,7 @@ (.parse builder istr))) (defmulti xml->doc (fn [thing] (class thing))) -(defmethod xml->doc String [thing] (xml-bytes->dom (.getBytes thing))) +(defmethod xml->doc String [thing] (xml-bytes->dom (.getBytes thing *default-encoding*))) (defmethod xml->doc (Class/forName "[B") [thing] (xml-bytes->dom thing)) (defmethod xml->doc InputStream [thing] (input-stream->dom thing)) (defmethod xml->doc org.w3c.dom.Document [thing] thing) @@ -88,7 +89,7 @@ (defmulti $x (fn [xp xml-thing] (class xml-thing))) (defmethod $x String [xp xml] - ($x xp (xml->doc (.getBytes xml)))) + ($x xp (xml->doc (.getBytes xml *default-encoding*)))) (defmethod $x (Class/forName "[B") [xp bytes] ($x xp (xml->doc bytes))) src/main/clj/com/github/kyleburton/clj_xpath.clj f7d92a5cdbe81757d91634cf690814345022932f Kyle Burton kyle.burton@gmail.com http://github.com/kyleburton/clj-xpath/commit/0d52c2657bbe775a7ddeb1f2fc025301b82c228d 0d52c2657bbe775a7ddeb1f2fc025301b82c228d 2009-10-22T19:47:26-07:00 2009-10-22T19:47:26-07:00 added Pauls UTF-8 as default encoding when calling getBytes 54ef15735ef5790eff1c265be925d971f0c38875 Kyle Burton kyle.burton@gmail.com