Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v diff -u -r1.140.2.40 -r1.140.2.41 --- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 26 May 2016 09:12:29 -0000 1.140.2.40 +++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 26 May 2016 16:23:47 -0000 1.140.2.41 @@ -4801,12 +4801,14 @@ foreach {k v} [ns_set array [ns_conn headers]] { append request "\n $k:\t$v" } - if {[ns_conn flags] & 1} { - append request "\n connection already closed" - } else { - set data [ns_conn content] - if {[string length $data] < 2000} { - append request "\n post-data:\t$data" + if {[ns_conn method] eq "POST"} { + if {[ns_conn flags] & 1} { + append request "\n connection already closed" + } else { + set data [ns_conn content] + if {[string length $data] < 2000} { + append request "\n post-data:\t$data" + } } } }