Index: http.pike
===================================================================
RCS file: /cvs/roxen_1.2/server/protocols/http.pike,v
retrieving revision 1.118
retrieving revision 1.119
diff -C1 -r1.118 -r1.119
*** http.pike	1998/11/04 20:32:01	1.118
--- http.pike	1999/01/14 02:29:14	1.119
***************
*** 8,10 ****
  #endif
! constant cvs_version = "$Id: http.pike,v 1.118 1998/11/04 20:32:01 peter Exp $";
  // HTTP protocol module.
--- 8,10 ----
  #endif
! constant cvs_version = "$Id: http.pike,v 1.119 1999/01/14 02:29:14 neotron Exp $";
  // HTTP protocol module.
***************
*** 307,308 ****
--- 307,313 ----
    }
+   if(! (<"GET", "HEAD", "POST", "PUT", "MOVE", "DELETE">)[method] ) {
+     send_result(http_low_answer(501, "<title>Method Not Implemented</title>"
+ 				"\n<h1>Method not implemented.</h1>\n"));
+     return -2;
+   }
  
***************
*** 994,997 ****
        file = http_low_answer(misc->error_code, errors[misc->error]);
-     else if(method != "GET" && method != "HEAD" && method != "POST")
-       file = http_low_answer(501, "Not implemented.");
      else if(err = catch {
--- 999,1000 ----
Index: ssl3.pike
===================================================================
RCS file: /cvs/roxen_1.2/server/protocols/ssl3.pike,v
retrieving revision 1.42
retrieving revision 1.44
diff -C1 -r1.42 -r1.44
*** ssl3.pike	1998/08/26 12:00:06	1.42
--- ssl3.pike	1999/01/14 02:29:13	1.44
***************
*** 1,2 ****
! /* $Id: ssl3.pike,v 1.42 1998/08/26 12:00:06 nisse Exp $
   *
--- 1,2 ----
! /* $Id: ssl3.pike,v 1.44 1999/01/14 02:29:13 neotron Exp $
   *
***************
*** 324,325 ****
--- 324,329 ----
  #if 1
+ void _force_destruct()
+ {
+ }
+ 
  void send_result(mapping|void result)
***************
*** 340,343 ****
        file = http_low_answer(misc->error_code, errors[misc->error]);
-     else if(method != "GET" && method != "HEAD" && method != "POST")
-       file = http_low_answer(501, "Not implemented.");
      else
--- 344,345 ----
***************
*** 467,468 ****
--- 469,472 ----
  
+   // FIXME: Delayed destruct of thiso?
+   _force_destruct();
    if(thiso && conf) conf->log(file, thiso);