* made FPathInfo field of TServletRequest protected instead of private,

    because it's exposed by a property in a derived class

git-svn-id: trunk@13793 -

packages/fcl-net/src/servlets.pp

@@ -35,8 +35,10 @@ type
   TServletRequest = class
   private
     FInputStream: TStream;
-    FScheme, FPathInfo: String;
+    FScheme: String;
   protected
+    FPathInfo: String;
+
     function GetContentLength: Integer; virtual; abstract;
     function GetContentType: String; virtual; abstract;
     function GetProtocol: String; virtual; abstract;