Index: openacs-4/packages/acs-kernel/acs-kernel.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/acs-kernel.info,v diff -u -N -r1.136.2.23 -r1.136.2.24 --- openacs-4/packages/acs-kernel/acs-kernel.info 6 Sep 2016 17:33:55 -0000 1.136.2.23 +++ openacs-4/packages/acs-kernel/acs-kernel.info 11 Nov 2016 00:09:20 -0000 1.136.2.24 @@ -24,7 +24,7 @@ - + Index: openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl,v diff -u -N -r1.48.2.5 -r1.48.2.6 --- openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl 28 Apr 2016 12:52:08 -0000 1.48.2.5 +++ openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl 11 Nov 2016 00:09:20 -0000 1.48.2.6 @@ -665,6 +665,9 @@ if { [ad_conn isconnected] } { # There is an HTTP connection - return the client property set ::acs_translator_mode_p [ad_get_client_property -default 0 acs-lang translator_mode_p] + if {$::acs_translator_mode_p eq ""} { + set ::acs_translator_mode_p 0 + } } else { # No HTTP connection set ::acs_translator_mode_p 0 Index: openacs-4/packages/evaluation/www/admin/tasks/task-add-edit.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/tasks/task-add-edit.adp,v diff -u -N -r1.7 -r1.7.2.1 --- openacs-4/packages/evaluation/www/admin/tasks/task-add-edit.adp 3 Jul 2015 10:47:37 -0000 1.7 +++ openacs-4/packages/evaluation/www/admin/tasks/task-add-edit.adp 11 Nov 2016 00:09:20 -0000 1.7.2.1 @@ -2,7 +2,7 @@ @page_title;literal@ @context;literal@ - - - - - - Index: openacs-4/packages/forums/lib/message/row2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/row2.tcl,v diff -u -N -r1.3.2.2 -r1.3.2.3 --- openacs-4/packages/forums/lib/message/row2.tcl 6 Nov 2016 11:03:00 -0000 1.3.2.2 +++ openacs-4/packages/forums/lib/message/row2.tcl 11 Nov 2016 00:09:20 -0000 1.3.2.3 @@ -100,7 +100,11 @@ }] } +template::add_body_handler -event onload -script [subst { + showExpandedOnLoad('$message(message_id)','$children_direct_list','$children_string'); +}] + # Local variables: # mode: tcl # tcl-indent-level: 4 Index: openacs-4/packages/forums/www/messages-get.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/messages-get.adp,v diff -u -N -r1.3 -r1.3.10.1 --- openacs-4/packages/forums/www/messages-get.adp 15 Dec 2006 22:45:34 -0000 1.3 +++ openacs-4/packages/forums/www/messages-get.adp 11 Nov 2016 00:09:21 -0000 1.3.10.1 @@ -2,17 +2,17 @@ nan - + - - + +
@message.content;noquote@
Index: openacs-4/packages/forums/www/messages-get.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/messages-get.tcl,v diff -u -N -r1.2.14.1 -r1.2.14.2 --- openacs-4/packages/forums/www/messages-get.tcl 12 Sep 2015 11:06:28 -0000 1.2.14.1 +++ openacs-4/packages/forums/www/messages-get.tcl 11 Nov 2016 00:09:21 -0000 1.2.14.2 @@ -13,6 +13,9 @@ set message(content) {} } +template::add_body_handler -event onload -script [subst { + copyContent('$cid','$dynamicmode'); +}] # Local variables: # mode: tcl Index: openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl,v diff -u -N -r1.103.2.10 -r1.103.2.11 --- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl 14 Oct 2016 19:22:11 -0000 1.103.2.10 +++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl 11 Nov 2016 00:09:21 -0000 1.103.2.11 @@ -467,6 +467,7 @@ #if {$sql eq ""} {set sql [my get_sql $qn]} if {$bind ne ""} {set bindOpt [list -bind $bind]} {set bindOpt ""} set qn [uplevel [list [self] qn $qn]] + #ns_log notice "### [list ::db_foreach -dbn $dbn $qn $sql $body {*}$bindOpt]" uplevel [list ::db_foreach -dbn $dbn $qn $sql $body {*}$bindOpt] }