Index: openacs-4/packages/categories/www/cadmin/category-form.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/cadmin/category-form.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/categories/www/cadmin/category-form.tcl	1 Feb 2004 19:12:51 -0000	1.3
+++ openacs-4/packages/categories/www/cadmin/category-form.tcl	9 Feb 2004 19:51:44 -0000	1.4
@@ -28,11 +28,11 @@
 set tree_name $tree(tree_name)
 
 if {[info exists object_id]} {
-    set context_bar [list [category::get_object_context $object_id] [list [export_vars -base one-object {locale object_id}]" "Category Management"]]
+    set context_bar [list [category::get_object_context $object_id] [list [export_vars -no_empty -base one-object {locale object_id}]" "Category Management"]]
 } else {
-    set context_bar [list [list ".?[export_vars {locale}]" "Category Management"]]
+    set context_bar [list [list ".?[export_vars -no_empty {locale}]" "Category Management"]]
 }
-lappend context_bar [list [export_vars -base tree-view {tree_id locale object_id}]" $tree_name] $page_title
+lappend context_bar [list [export_vars -no_empty -base tree-view {tree_id locale object_id}]" $tree_name] $page_title
 
 set languages [db_list_of_lists get_ad_locales ""]
 
@@ -56,7 +56,7 @@
 } -edit_data {
     category::update -category_id $category_id -locale $language -name $name -description $description
 } -after_submit {
-    ad_returnredirect [export_vars -base tree-view {tree_id locale object_id}]
+    ad_returnredirect [export_vars -no_empty -base tree-view {tree_id locale object_id}]
     ad_script_abort
 }