mirror of
https://github.com/danieleteti/delphimvcframework.git
synced 2024-11-15 15:55:54 +01:00
Change SEATTLEORBETTER to TOKYOORBETTER
This commit is contained in:
parent
7d1ab3d787
commit
e98053958c
@ -56,7 +56,7 @@ type
|
||||
implementation
|
||||
|
||||
uses
|
||||
{$IF defined(SEATTLEORBETTER)}
|
||||
{$IF defined(TOKYOORBETTER)}
|
||||
System.Hash,
|
||||
{$ELSE}
|
||||
IdHashMessageDigest,
|
||||
@ -67,12 +67,12 @@ uses
|
||||
{ TMVCETagMiddleware }
|
||||
|
||||
function TMVCETagMiddleware.GetHashMD5FromStream(AStream: TStream): string;
|
||||
{$IF not defined(SEATTLEORBETTER)}
|
||||
{$IF not defined(TOKYOORBETTER)}
|
||||
var
|
||||
lMD5Hash: TIdHashMessageDigest5;
|
||||
{$ENDIF}
|
||||
begin
|
||||
{$IF defined(SEATTLEORBETTER)}
|
||||
{$IF defined(TOKYOORBETTER)}
|
||||
Result := THashMD5.GetHashString(AStream);
|
||||
{$ELSE}
|
||||
lMD5Hash := TIdHashMessageDigest5.Create;
|
||||
|
Loading…
Reference in New Issue
Block a user