netserver/HWProto.hs
changeset 890 1d8c4a5ec622
child 891 701f86df9b4c
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/netserver/HWProto.hs	Wed Apr 30 19:44:54 2008 +0000
@@ -0,0 +1,7 @@
+module HWProto where
+
+import IO
+import Miscutils
+
+handleCmd :: ClientInfo -> [ClientInfo] -> [RoomInfo] -> String -> (Bool, Bool, [String])
+handleCmd _ _ _ ('Q':'U':'I':'T':xs) = (True, False, [])