Changeset 302 for trunk/UPlayer.pas

Timestamp:

Aug 11, 2019, 11:06:54 AM (5 years ago)

Author:

chronos

Message:

• Fixed: Some repeated moves were disappearing.
• Fixed: Move once count was not set correctly on unit move edit.

File:

• trunk/UPlayer.pas (modified) (2 diffs)

trunk/UPlayer.pas

@@ -6 +6 @@
 
 uses
-  Classes, SysUtils, Graphics, UMap, DOM, fgl, XMLConf, UXMLUtils, Math,
+  Classes, SysUtils, Graphics, UMap, DOM, fgl2, XMLConf, UXMLUtils, Math,
   UGeometry, UUnit, UNation, UItemList;
 
@@ -943 +943 @@
     if not Assigned(CellTo.MapCell.OneUnit) then begin
       CellTo.MapCell.OneUnit := TGame(Game).Units.AddNew(CellFrom.MapCell.OneUnit.Kind, 0);
+      CellTo.MapCell.OneUnit.Player := Self;
       CellTo.MapCell.Player := Self;
     end;