From bdeca614c4b460e62a27858f5526134564be999b Mon Sep 17 00:00:00 2001 From: Daniele Teti Date: Mon, 27 May 2024 09:07:37 +0200 Subject: [PATCH] Updated sqids ext lib --- sources/sqids.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/sources/sqids.pas b/sources/sqids.pas index 71d4edcb..1ecdafac 100644 --- a/sources/sqids.pas +++ b/sources/sqids.pas @@ -185,7 +185,7 @@ function TSqids.ToNumber(AId: string; AAlphabet: string): TNumber; 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;