Index: openacs-4/packages/acs-templating/tcl/tag-init.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/tag-init.tcl,v diff -u -r1.39.2.10 -r1.39.2.11 --- openacs-4/packages/acs-templating/tcl/tag-init.tcl 11 Oct 2015 17:35:22 -0000 1.39.2.10 +++ openacs-4/packages/acs-templating/tcl/tag-init.tcl 27 Oct 2015 10:03:08 -0000 1.39.2.11 @@ -34,7 +34,8 @@ template_tag property { chunk params } { set name [ns_set iget $params name] - set adp [ns_set iget $params adp 0] + set adp [ns_set iget $params adp] + if {$adp eq ""} {set adp 0} # quote dollar signs, square bracket and quotes regsub -all {[\]\[\"\\$]} $chunk {\\&} quoted_chunk @@ -102,7 +103,8 @@ # ad_proc -private template:template_tag_helper {params} { set src [ns_set iget $params src] - set ds [ns_set iget $params ds 1] + set ds [ns_set iget $params ds] + if {$ds eq ""} {set ds 1} #Start developer support frame around subordinate template. if { $ds && [info commands ::ds_enabled_p] ne "" && [info commands ::ds_adp_start_box] ne "" } { @@ -666,7 +668,8 @@ # the theme package # set src [template::themed_template [ns_set iget $params src]] - set ds [ns_set iget $params ds 1] + set ds [ns_set iget $params ds] + if {$ds eq ""} {set ds 1} #Start developer support frame around subordinate template. if { $ds && [info commands ::ds_enabled_p] ne "" && [info commands ::ds_adp_start_box] ne ""} {