Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uLandObjects.pas
changeset 12190 4d818abdc00f
parent 12189 31184d9b9bfc
child 12592 00b539e6115d 
--- a/hedgewars/uLandObjects.pas	Sat Apr 08 17:17:28 2017 +0200
+++ b/hedgewars/uLandObjects.pas	Sat Apr 08 17:21:22 2017 +0200
@@ -777,7 +777,7 @@
         i:= Pos(',', s);
         watFrameTicks:= StrToInt(Trim(Copy(s, 1, Pred(i))));
         Delete(s, 1, i);
-        watMove:= StrToInt(Trim(Copy(s, 1, Pred(i))));
+        watMove:= StrToInt(Trim(s));
         end
     else if key = 'sd-water-animation' then
         begin
@@ -787,7 +787,7 @@
         i:= Pos(',', s);
         watSDFrameTicks:= StrToInt(Trim(Copy(s, 1, Pred(i))));
         Delete(s, 1, i);
-        watSDMove:= StrToInt(Trim(Copy(s, 1, Pred(i))));
+        watSDMove:= StrToInt(Trim(s));
         end
     else if key = 'flakes' then
         begin
hedgewars