Index: openacs-4/packages/categories/www/cadmin/tree-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/cadmin/tree-view.tcl,v diff -u -N -r1.23.2.1 -r1.23.2.2 --- openacs-4/packages/categories/www/cadmin/tree-view.tcl 20 Dec 2019 21:18:10 -0000 1.23.2.1 +++ openacs-4/packages/categories/www/cadmin/tree-view.tcl 29 Aug 2022 14:17:25 -0000 1.23.2.2 @@ -67,7 +67,7 @@ set parent_url [export_vars -no_empty -base category-parent-change { category_id tree_id locale object_id ctx_id}] set links_view_url [export_vars -no_empty -base category-links-view { category_id tree_id locale object_id ctx_id}] set synonyms_view_url [export_vars -no_empty -base synonyms-view { category_id tree_id locale object_id ctx_id}] - if { [template::util::is_true $deprecated_p] } { + if { [string is true -strict $deprecated_p] } { set phase_in_url [export_vars -no_empty -base category-phase-in { category_id tree_id locale object_id ctx_id}] } else { set phase_out_url [export_vars -no_empty -base category-phase-out { category_id tree_id locale object_id ctx_id}]