From 1143bde46c2be6182a986e6daaacf311a0d1c12d Mon Sep 17 00:00:00 2001
From: Tony Garnock-Jones <tonygarnockjones@gmail.com>
Date: Sat, 24 Mar 2012 21:15:49 -0400
Subject: [PATCH] Ignore unknown messages in role message handlers

---
 os2.rkt | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/os2.rkt b/os2.rkt
index 718728e..b6f9f2d 100644
--- a/os2.rkt
+++ b/os2.rkt
@@ -149,7 +149,8 @@
 						[state-pattern
 						 (match message-body
 						   [message-pattern clause-body ...]
-						   ...)])))])
+						   ...
+						   [_ state])])))])
 	   #'(add-role topic-expr
 		       (handlers presence-handler absence-handler message-handler)
 		       ready-handler)))])))