Changeset 376 for Network/CoolWeb/WebServer/UWebApp.pas

Timestamp:

Jun 18, 2012, 10:42:17 PM (12 years ago)

Author:

chronos

Message:

• Modified: QueryParts renamed to Path as TListString type.

File:

• Network/CoolWeb/WebServer/UWebApp.pas (modified) (1 diff)

Network/CoolWeb/WebServer/UWebApp.pas

@@ -125 +125 @@
 begin
   with HandlerData do begin
-    if Request.QueryParts.Count > 0 then PageName := Request.QueryParts[0]
+    if Request.Path.Count > 0 then PageName := Request.Path[0]
       else PageName := '';
     Page := FindByName(PageName);