From 1e678ad358511c6c36437daf829d1db2a1d23178 Mon Sep 17 00:00:00 2001 From: Vinicius Sanchez Date: Mon, 14 Feb 2022 13:52:32 -0300 Subject: [PATCH] JWT signature is invalid. #25 --- samples/delphi/auth/samples.dproj | 2 +- src/Horse.JWT.pas | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/samples/delphi/auth/samples.dproj b/samples/delphi/auth/samples.dproj index 694c083..e7e6795 100644 --- a/samples/delphi/auth/samples.dproj +++ b/samples/delphi/auth/samples.dproj @@ -76,7 +76,7 @@ true $(BDS)\bin\delphi_PROJECTICON.ico $(BDS)\bin\delphi_PROJECTICNS.icns - $(Horse);modules\.dcp;modules\.dcu;modules;modules\delphi-jose-jwt\Source\Common;modules\delphi-jose-jwt\Source\JOSE;modules\horse\src;modules\jhonson\src;$(DCC_UnitSearchPath) + $(Horse);$(DCC_UnitSearchPath);modules\.dcp;modules\.dcu;modules;modules\delphi-jose-jwt\Source\Common;modules\delphi-jose-jwt\Source\JOSE;modules\horse\src;modules\jhonson\src VCL;$(DCC_Framework) samples diff --git a/src/Horse.JWT.pas b/src/Horse.JWT.pas index 605c07e..03df610 100644 --- a/src/Horse.JWT.pas +++ b/src/Horse.JWT.pas @@ -180,7 +180,7 @@ procedure Middleware(AHorseRequest: THorseRequest; raise EHorseCallbackInterrupted.Create; end; - LToken := LToken.Replace('bearer ', '', [rfIgnoreCase]); + LToken := Trim(LToken.Replace('bearer', '', [rfIgnoreCase])); {$IFNDEF FPC} LBuilder := TJOSEConsumerBuilder