Index: openacs-4/packages/xotcl-core/tcl/50-protocol-handler-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/50-protocol-handler-procs.tcl,v diff -u -r1.30.2.8 -r1.30.2.9 --- openacs-4/packages/xotcl-core/tcl/50-protocol-handler-procs.tcl 9 May 2022 17:11:03 -0000 1.30.2.8 +++ openacs-4/packages/xotcl-core/tcl/50-protocol-handler-procs.tcl 27 Nov 2022 17:35:47 -0000 1.30.2.9 @@ -298,12 +298,12 @@ {} $body \n \n } - ProtocolHandler instproc multiStatusResonse { + ProtocolHandler instproc multiStatusResponse { -href:required -propstats:required {-propstatus true} } { - :log "multiStatusResonse href $href propstats $propstats" + :log "multiStatusResponse href $href propstats $propstats" append reply \n \ {} \ "\n$href\n" @@ -342,7 +342,7 @@ D:getcontentlength "" \ D:creationdate "" \ D:resourcetype "" - set r [:multiStatus [:multiStatusResonse \ + set r [:multiStatus [:multiStatusResponse \ -href [ns_urldecode [ns_conn url]] \ -propstats [list $davprops $status]]] :log multiStatusError=$r @@ -377,7 +377,7 @@ D:lockdiscovery {} ns_return 207 text/xml [:multiStatus \ - [:multiStatusResonse \ + [:multiStatusResponse \ -href ${:uri} \ -propstats [list $davprops "HTTP/1.1 200 OK"]]] }