mirror of
https://github.com/danieleteti/delphimvcframework.git
synced 2024-11-15 07:45:54 +01:00
Updated sqids ext lib
This commit is contained in:
parent
1f06210979
commit
bdeca614c4
@ -185,7 +185,7 @@ begin
|
||||
L := Length(AAlphabet);
|
||||
|
||||
for C in AId do
|
||||
Result := Result * L + TNumber(Pos(C, AAlphabet)) - 1;
|
||||
Result := Result * L + (TNumber(Pos(C, AAlphabet)) - 1);
|
||||
end;
|
||||
|
||||
function TSqids.IsBlocked(AId: string): Boolean;
|
||||
|
Loading…
Reference in New Issue
Block a user