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