Updated sqids ext lib

This commit is contained in:
Daniele Teti 2024-05-27 09:07:37 +02:00
parent 1f06210979
commit bdeca614c4

View File

@ -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;