X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_holmes_cmd.inc;h=e76b7f2918268195a3ea72b463573828fee3ac66;hb=4d5a94c228a43cdd0333979f3aa218c56c248188;hp=578f86583d3d3df5ea68f8afebc94f630fa1a754;hpb=5c72767aba48c236cd81972a6d79ff67b64ecd92;p=d2df-sdl.git

diff --git a/src/game/g_holmes_cmd.inc b/src/game/g_holmes_cmd.inc
index 578f865..e76b7f2 100644
--- a/src/game/g_holmes_cmd.inc
+++ b/src/game/g_holmes_cmd.inc
@@ -44,7 +44,7 @@ type
     function cmdName (): AnsiString;
   end;
 
-  TCmdHash = specialize THashBase<AnsiString, PHolmesCommand>;
+  TCmdHash = specialize THashBase<AnsiString, PHolmesCommand, THashKeyStr>;
 
 
 // ////////////////////////////////////////////////////////////////////////// //
@@ -112,7 +112,7 @@ end;
 // ////////////////////////////////////////////////////////////////////////// //
 function hashNewCommand (): TCmdHash;
 begin
-  result := TCmdHash.Create(hashStrHash, hashStrEqu, hashStrFree);
+  result := TCmdHash.Create();
 end;