Index: openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl,v
diff -u -r1.118.2.6 -r1.118.2.7
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	31 Oct 2015 18:45:37 -0000	1.118.2.6
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	16 Nov 2015 13:10:29 -0000	1.118.2.7
@@ -230,8 +230,8 @@
         return
     }
 
-    if {$method ni { GET POST HEAD }} {
-        error "Method passed to ad_register_proc must be one of GET, POST, or HEAD"
+    if {$method ni { GET POST HEAD PUT DELETE }} {
+        error "Method passed to ad_register_proc must be one of GET, POST, HEAD, PUT and DELETE"
     }
 
     set proc_info [list $method $path $proc $arg $debug $noinherit $description [info script]]