Index: openacs-4/packages/categories/tcl/widget-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/tcl/widget-procs.tcl,v
diff -u -r1.18 -r1.19
--- openacs-4/packages/categories/tcl/widget-procs.tcl	8 Nov 2005 15:48:10 -0000	1.18
+++ openacs-4/packages/categories/tcl/widget-procs.tcl	31 Jul 2006 20:31:11 -0000	1.19
@@ -93,16 +93,16 @@
     if { [empty_string_p $tree_id] } {
         set mapped_trees [category_tree::get_mapped_trees $package_id]
     } else {
-	set mapped_trees {}
-	foreach one_tree $tree_id one_subtree $subtree_id assign_single $assign_single_p require_category $require_category_p {
-	    if {[empty_string_p $assign_single]} {
-		set assign_single f
-	    }
-	    if {[empty_string_p $require_category]} {
-		set require_category f
-	    }
-	    lappend mapped_trees [list $one_tree [category_tree::get_name $one_tree] $one_subtree $assign_single $require_category]
-	}
+        set mapped_trees {}
+        foreach one_tree $tree_id one_subtree $subtree_id assign_single $assign_single_p require_category $require_category_p {
+            if {[empty_string_p $assign_single]} {
+                set assign_single f
+            }
+            if {[empty_string_p $require_category]} {
+                set require_category f
+            }
+            lappend mapped_trees [list $one_tree [category_tree::get_name $one_tree] $one_subtree $assign_single $require_category]
+        }
     }
 
     foreach mapped_tree $mapped_trees {
@@ -144,7 +144,7 @@
         }
     }
 
-    return $output
+    return [lang::util::localize $output]
 }
 
 ad_proc -public template::data::validate::category { value_ref message_ref } {