# HG changeset patch
# User unc0rr
# Date 1225463759 0
# Node ID ef9785d0b3928586b514be47d2c73828d5c3921a
# Parent  d2a6b02b697b35b7c77e33b31cf7a25e082c5773
Fix a bug (check parameters)

diff -r d2a6b02b697b -r ef9785d0b392 netserver/HWProto.hs
--- a/netserver/HWProto.hs	Fri Oct 31 14:30:08 2008 +0000
+++ b/netserver/HWProto.hs	Fri Oct 31 14:35:59 2008 +0000
@@ -219,7 +219,10 @@
 	if not $ isMaster client then
 		(noChangeClients, noChangeRooms, answerNotMaster)
 	else
-		(noChangeClients, modifyRoom $ modifyTeam clRoom team{teamcolor = newColor}, answerTeamColor teamName newColor)
+		if noSuchTeam then
+			(noChangeClients, noChangeRooms, answerBadParam)
+		else
+			(noChangeClients, modifyRoom $ modifyTeam clRoom team{teamcolor = newColor}, answerTeamColor teamName newColor)
 	where
 		noSuchTeam = isNothing findTeam
 		team = fromJust findTeam