Index: openacs-4/packages/acs-tcl/tcl/tcltrace-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/tcltrace-init.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/acs-tcl/tcl/tcltrace-init.tcl	12 Dec 2017 10:27:11 -0000	1.3
+++ openacs-4/packages/acs-tcl/tcl/tcltrace-init.tcl	21 Dec 2017 20:47:48 -0000	1.4
@@ -37,7 +37,8 @@
 #
 # traces with context
 #
-#set traced_cmds {::ns_return}
+#set traced_cmds {::ns_return ::ns_returnredirect}
+
 foreach cmd $traced_cmds {
     append trace "\ntrace add execution $cmd  enter {::tcltrace::before -details}"
 }