Index: openacs-4/packages/xowiki/tcl/form-field-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/form-field-procs.tcl,v diff -u -N -r1.67 -r1.68 --- openacs-4/packages/xowiki/tcl/form-field-procs.tcl 16 Apr 2008 10:32:38 -0000 1.67 +++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl 16 Apr 2008 20:23:28 -0000 1.68 @@ -402,7 +402,8 @@ # # The usage of the label does not seem to be very useful. # - set tree_id [category_tree::get_id $tree_name [my locale]] + #set tree_id [category_tree::get_id $tree_name [my locale]] + set tree_id [category_tree::get_id $tree_name] if {$tree_id eq ""} { my msg "cannot lookup category tree name '$tree_name'" return