Explorar o código

* Support all methods

git-svn-id: trunk@27707 -
michael %!s(int64=11) %!d(string=hai) anos
pai
achega
f28dbdafcc
Modificáronse 1 ficheiros con 0 adicións e 2 borrados
  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;
 (*