X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_game.pas;h=ca0bea81dcbceb186b04afd137886b03d74542a6;hb=82fc44046c22d1b60695f3b1f7abfb48f18bea48;hp=0231bc8c5858249a2d24586d2772aacd879cb359;hpb=b9615dc5473b0eadac9f3298714b440ff406d322;p=d2df-sdl.git

diff --git a/src/game/g_game.pas b/src/game/g_game.pas
index 0231bc8..ca0bea8 100644
--- a/src/game/g_game.pas
+++ b/src/game/g_game.pas
@@ -7224,7 +7224,6 @@ end;
 procedure SystemCommands(P: SSArray);
 var
   cmd: string;
-  a: Integer;
 begin
   cmd := LowerCase(P[0]);
   case cmd of