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.51 -r1.140.2.52
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	30 Sep 2016 11:00:38 -0000	1.140.2.51
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	4 Oct 2016 19:31:10 -0000	1.140.2.52
@@ -4896,9 +4896,12 @@
                     append info "\n        $k:\t$v"
                 }
             } else {
-                set data [ns_conn content]
-                if {[string length $data] < 2000} {
-                    append info "\n        post-data: $data"
+                set ct [ns_set iget [ns_conn headers] content-type]
+                if {[string match text/* $ct]} {
+                    set data [ns_conn content]
+                    if {[string length $data] < 2000} {
+                        append info "\n        post-data: $data"
+                    }
                 }
             }
         }