diff --git a/src/cljs/domina/events.cljs b/src/cljs/domina/events.cljs
index 1db48f3..c6bcfcd 100644
--- a/src/cljs/domina/events.cljs
+++ b/src/cljs/domina/events.cljs
@@ -39,7 +39,13 @@
              val
              (aget evt (name k))))
          (-lookup [o k not-found] (or (-lookup o k)
-                                      not-found))))
+                                      not-found))
+         ISeqable
+         (-seq [o] 
+           (map #(vector % (gobj/get evt %)) (prim-seq (gobj/getKeys evt) 0)))
+         IPrintWithWriter
+         (-pr-writer [o writer opts]
+           (-write writer (into {} (seq o))))))
     true))
 
 (defn- listen-internal!