small fix to have LUA_DISABLED working again hedgeroid
authorXeli
Wed, 06 Jul 2011 14:38:06 +0200
branchhedgeroid
changeset 5410 8e7787065e2d
parent 5408 1c2f0dfbe759
child 5412 ab055114c788
small fix to have LUA_DISABLED working again
hedgewars/uScript.pas
--- a/hedgewars/uScript.pas	Tue Jul 05 23:30:35 2011 +0200
+++ b/hedgewars/uScript.pas	Wed Jul 06 14:38:06 2011 +0200
@@ -30,7 +30,6 @@
  *       unnoticed and render the parameter useless!)
  *)
 interface
-
 procedure ScriptPrintStack;
 procedure ScriptClearStack;
 
@@ -43,8 +42,9 @@
 function ScriptCall(fname : shortstring; par1, par2, par3: LongInt) : LongInt;
 function ScriptCall(fname : shortstring; par1, par2, par3, par4 : LongInt) : LongInt;
 function ScriptExists(fname : shortstring) : boolean;
+
+
 function ParseCommandOverride(key, value : shortstring) : shortstring;
-
 procedure initModule;
 procedure freeModule;
 
@@ -1935,6 +1935,11 @@
 ScriptExists:= false
 end;
 
+function ParseCommandOverride(key, value : shortstring) : shortstring;
+begin
+ParseCommandOverride:= value
+end;
+
 procedure initModule;
 begin
 end;