Back out 12847:1aba77b2e4ac This both does NOT fix the seed mismatch with shoppa map preview *AND* breaks otherwise identical scripts with different file encodings due to multiple lua calls.
authornemo
Sun, 29 Apr 2018 10:47:02 -0400
changeset 13353 5f6208031658
parent 13352 e7b89e87a1b3
child 13354 40742f3f7dd9
Back out 12847:1aba77b2e4ac This both does NOT fix the seed mismatch with shoppa map preview *AND* breaks otherwise identical scripts with different file encodings due to multiple lua calls.
hedgewars/uScript.pas
--- a/hedgewars/uScript.pas	Sun Apr 29 09:24:14 2018 -0400
+++ b/hedgewars/uScript.pas	Sun Apr 29 10:47:02 2018 -0400
@@ -3323,7 +3323,6 @@
 var mybuf: PChar;
     i: LongInt;
 begin
-    SetRandomSeed(cSeed,true);
     mybuf := physfsReader(L, f, sz);
     if (mybuf <> nil) and ((sz^) > 0) then
         begin