Index: openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl,v diff -u -r1.144 -r1.145 --- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 5 May 2008 12:29:17 -0000 1.144 +++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 6 May 2008 12:42:22 -0000 1.145 @@ -747,6 +747,7 @@ #my msg "--set instance attributes to [array get __ia]" my instance_attributes [array get __ia] my array set __ia [my instance_attributes] + #my msg category_ids=$category_ids return [list $validation_errors [lsort -unique $category_ids]] }