# HG changeset patch
# User unc0rr
# Date 1225838528 0
# Node ID 8817adb86da6bc35d799f3e815e34f3b1f6c2a68
# Parent  60e1fad78d58a4f5fe3f0afea7453cea3c5e6694
Oops, fix build

diff -r 60e1fad78d58 -r 8817adb86da6 netserver/hedgewars-server.hs
--- a/netserver/hedgewars-server.hs	Tue Nov 04 21:53:30 2008 +0000
+++ b/netserver/hedgewars-server.hs	Tue Nov 04 22:42:08 2008 +0000
@@ -91,9 +91,10 @@
 
 	clientsIn <- sendAnswers answers mclient mclients mrooms
 	let quitClient = find forceQuit $ clientsIn
+	
 	if isJust quitClient then
 		reactCmd ["QUIT"] (fromJust quitClient) clientsIn mrooms
-	else
+		else
 		return (clientsIn, mrooms)