Parcourir la source

* Support all methods

git-svn-id: trunk@27707 -
michael il y a 11 ans
Parent
commit
f28dbdafcc
1 fichiers modifiés avec 0 ajouts et 2 suppressions
  1. 0 2
      packages/fcl-web/tests/testcgiapp.pp

+ 0 - 2
packages/fcl-web/tests/testcgiapp.pp

@@ -115,8 +115,6 @@ begin
   else
     begin
     Method:=Uppercase(Method);
-    If (Method<>'POST') and (Method<>'GET') then
-      Raise Exception.CreateFmt(SerrUnsupportedMethod,['METHOD']);
     end;
 end;
 (*