# HG changeset patch
# User Henek
# Date 1290416648 -3600
# Node ID 79fbc444584cc932e62d7b56688be7888962c902
# Parent  f9e38ce1e813defbf98b45ea7cd911294abe5fd2
fix SetEffect, last parameter was not a boolean

diff -r f9e38ce1e813 -r 79fbc444584c hedgewars/uScript.pas
--- a/hedgewars/uScript.pas	Mon Nov 22 00:34:53 2010 +0100
+++ b/hedgewars/uScript.pas	Mon Nov 22 10:04:08 2010 +0100
@@ -574,7 +574,7 @@
     else begin
         gear := GearByUID(lua_tointeger(L, 1));
         if gear <> nil then
-            gear^.Hedgehog^.Effects[THogEffect(lua_tointeger(L, 2))]:= lua_tointeger(L, 3) <> 0;
+            gear^.Hedgehog^.Effects[THogEffect(lua_tointeger(L, 2))]:= lua_toboolean(L, 3);
     end;
     lc_seteffect := 0;
 end;