(fix) bypass root route in lazarus

in Lazarus the Req.Web Request.PathInfo returns empty for the '/' route, so if this route is in the skip route, lazarus was not recognizing it.

Author: gabrielbaltazar

src/Horse.BasicAuthentication.pas

@@ -78,8 +78,12 @@ procedure Middleware(Req: THorseRequest; Res: THorseResponse; Next: {$IF DEFINED
   LBase64String: string;
   LBasicAuthenticationDecode: TStringList;
   LIsAuthenticated: Boolean;
+  LPathInfo: string;
 begin
-  if MatchText(Req.RawWebRequest.PathInfo, Config.SkipRoutes) then
+  LPathInfo := Req.RawWebRequest.PathInfo;
+  if LPathInfo = EmptyStr then
+    LPathInfo := '/';
+  if MatchText(LPathInfo, Config.SkipRoutes) then
   begin
     Next();
     Exit;
@@ -186,4 +190,4 @@ function THorseBasicAuthenticationConfig.SkipRoutes: TArray<string>;
   Result := FSkipRoutes;
 end;
 
-end.
+end.