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.21 -r1.140.2.22 --- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 5 Jan 2016 14:55:50 -0000 1.140.2.21 +++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 13 Feb 2016 15:23:32 -0000 1.140.2.22 @@ -4749,15 +4749,15 @@ @author Gustaf Neumann } { - set prefix "" + set request "" if {[ns_conn isconnected]} { set headers [ns_conn headers] - append prefix \ + append request " " \ [ns_conn method] \ " http://[ns_set iget $headers host][ns_conn url]?[ns_conn query]" \ " referred by '[get_referrer]'\n" } - ns_log $level "${prefix}${message}\n[uplevel ad_get_tcl_call_stack]" + ns_log $level "${message}\n[uplevel ad_get_tcl_call_stack]${request}\n" } # Local variables: