fix #17 by resetting path on respawn

1 files changed, 7 insertions, 0 deletions

diff --git a/eepers.adb b/eepers.adb
index 5baf170..51ae67e 100644
--- a/eepers.adb
+++ b/eepers.adb
@@ -1383,6 +1383,13 @@ procedure Eepers is
 
             if (Get_Time - Game.Player.Death_Time) > RESTART_TIMEOUT_SECS then
                 Game_Restore_Checkpoint(Game);
+                for Me in Eeper_Index loop
+                    for Y in Game.Eepers(Me).Path'Range(1) loop
+                        for X in Game.Eepers(Me).Path'Range(2) loop
+                            Game.Eepers(Me).Path(Y, X) := -1;
+                        end loop;
+                    end loop;
+                end loop;
                 Game.Player.Dead := False;
             end if;