瀏覽代碼

* Patch from stephano to fix header parsing (bug ID 29918)

git-svn-id: trunk@33364 -
michael 9 年之前
父節點
當前提交
13e1bf4066
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/fcl-web/src/base/fphttpserver.pp

+ 1 - 1
packages/fcl-web/src/base/fphttpserver.pp

@@ -420,7 +420,7 @@ begin
     Exit;
     end;
   N:=Copy(V,1,P-1);
-  Delete(V,1,P+1);
+  Delete(V,1,P);
   V:=Trim(V);
   ARequest.SetFieldByName(N,V);
 end;