JWT signature is invalid. #25

HashLoad · Feb 14, 2022 · 1e678ad · 1e678ad
1 parent 7a42c60
commit 1e678ad
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/samples/delphi/auth/samples.dproj b/samples/delphi/auth/samples.dproj
@@ -76,7 +76,7 @@
         <UsingDelphiRTL>true</UsingDelphiRTL>
         <Icon_MainIcon>$(BDS)\bin\delphi_PROJECTICON.ico</Icon_MainIcon>
         <Icns_MainIcns>$(BDS)\bin\delphi_PROJECTICNS.icns</Icns_MainIcns>
-        <DCC_UnitSearchPath>$(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)</DCC_UnitSearchPath>
+        <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</DCC_UnitSearchPath>
         <DCC_Framework>VCL;$(DCC_Framework)</DCC_Framework>
         <SanitizedProjectName>samples</SanitizedProjectName>
     </PropertyGroup>

diff --git 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