default handle-message method prints args

telent · Mar 21, 2013 · 28f0f0d · 28f0f0d
1 parent a54f6d3
commit 28f0f0d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/psadan/channel.clj b/src/psadan/channel.clj
@@ -24,7 +24,7 @@
       (deliver promise m))))
 
 (defmethod handle-message :default [conn m]
-  (println ["unknown message" (:name (:interface m)) (:message m)]))
+  (println ["unhandled message" (:name (:interface m)) (:message m) (:args m)]))
 
 (defn listen [conn]
   (let [buf (conn/read-buffer conn)