diff --git a/src/squee/impl/util.clj b/src/squee/impl/util.clj
index 9747395..2663103 100644
--- a/src/squee/impl/util.clj
+++ b/src/squee/impl/util.clj
@@ -23,7 +23,7 @@
   [m]
   (let [p (Properties.)]
     (doseq [[k v] m]
-      (.setProperty p k v))
+      (.setProperty p (name k) v))
     p))
 
 (def ^{:doc "Map of classnames to subprotocols"} classnames