Index: openacs-4/packages/categories/www/cadmin/category-link-delete-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/cadmin/category-link-delete-2.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/categories/www/cadmin/category-link-delete-2.tcl 9 Feb 2004 19:51:44 -0000 1.2 +++ openacs-4/packages/categories/www/cadmin/category-link-delete-2.tcl 10 Feb 2004 12:07:04 -0000 1.3 @@ -20,7 +20,7 @@ category_link::delete $link_id } } on_error { - ad_return_complaint 1 "Error deleting category link." + ad_return_complaint 1 {{Error deleting category link.}} return } Index: openacs-4/packages/categories/www/cadmin/tree-delete-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/cadmin/tree-delete-2.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/categories/www/cadmin/tree-delete-2.tcl 9 Feb 2004 19:48:44 -0000 1.3 +++ openacs-4/packages/categories/www/cadmin/tree-delete-2.tcl 10 Feb 2004 12:07:04 -0000 1.4 @@ -16,7 +16,7 @@ set instance_list [category_tree::usage $tree_id] if {[llength $instance_list] > 0} { - ad_return_complaint 1 "This category tree is still in use." + ad_return_complaint 1 {{This category tree is still in use.}} return }