small fixes
authorunc0rr
Sun, 23 Nov 2008 23:16:33 +0000
changeset 1508 ef093f31ced1
parent 1507 d18c67b7ad4c
child 1509 34f7dd4efe84
small fixes
hedgewars/uConsts.pas
netserver/hedgewars-server.hs
--- a/hedgewars/uConsts.pas	Sat Nov 22 14:39:14 2008 +0000
+++ b/hedgewars/uConsts.pas	Sun Nov 23 23:16:33 2008 +0000
@@ -1015,7 +1015,7 @@
 			TimeAfterTurn: 0;
 			minAngle: 0;
 			maxAngle: 0;
-			isDamaging: true;
+			isDamaging: false;
 			SkipTurns: 0;
 			PosCount: 1;
 			PosSprite: sprWater),
--- a/netserver/hedgewars-server.hs	Sat Nov 22 14:39:14 2008 +0000
+++ b/netserver/hedgewars-server.hs	Sun Nov 23 23:16:33 2008 +0000
@@ -6,7 +6,7 @@
 import System.IO
 import Control.Concurrent
 import Control.Concurrent.STM
-import Control.Exception (setUncaughtExceptionHandler, handle, finally)
+import Control.Exception (handle, finally)
 import Control.Monad
 import Maybe (fromMaybe, isJust, fromJust)
 import Data.List