Changeset 80 for trunk/UCore.pas

Timestamp:

Nov 4, 2014, 9:24:27 PM (10 years ago)

Author:

chronos

Message:

• Fixed: Autosave should not affect game filename and path selected by user.
• Fixed: In some cases more units was moved from cell then call have in total. Now move units only up to maximum of cell.

File:

• trunk/UCore.pas (modified) (1 diff)

trunk/UCore.pas

@@ -141 +141 @@
 
 procedure TCore.AutoSave;
-begin
+var
+  OldFileName: string;
+begin
+  OldFileName := Game.FileName;
   Game.SaveToFile(GetAppConfigDir(False) + 'AutoSave.xtg');
-  GetUserDir;
+  Game.FileName := OldFileName;
 end;