Index: openacs-4/packages/categories/www/cadmin/synonyms-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/cadmin/synonyms-view.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/categories/www/cadmin/synonyms-view.tcl 1 Mar 2005 00:01:27 -0000 1.2 +++ openacs-4/packages/categories/www/cadmin/synonyms-view.tcl 6 Nov 2008 15:50:44 -0000 1.3 @@ -10,6 +10,7 @@ {locale ""} object_id:integer,optional orderby:optional + ctx_id:integer,optional } -properties { page_title:onevalue context_bar:onevalue @@ -23,7 +24,9 @@ set category_name [category::get_name $category_id $locale] set page_title "Synonyms for category \"$tree_name :: $category_name\"" -set context_bar [category::context_bar $tree_id $locale [value_if_exists object_id]] +set context_bar [category::context_bar $tree_id $locale \ + [value_if_exists object_id] \ + [value_if_exists ctx_id]] lappend context_bar "Synonyms of $category_name" @@ -35,10 +38,10 @@ -name synonyms \ -no_data "None" \ -key synonym_id \ - -actions [list "Add synonym" [export_vars -no_empty -base synonym-form { category_id tree_id locale object_id }] "Add new synonym"] \ + -actions [list "Add synonym" [export_vars -no_empty -base synonym-form { category_id tree_id locale object_id ctx_id}] "Add new synonym"] \ -bulk_actions { "Delete" "synonym-delete" "Delete checked synonyms" - } -bulk_action_export_vars { category_id tree_id locale object_id + } -bulk_action_export_vars { category_id tree_id locale object_id ctx_id } -orderby { default_value language,asc synonym_name { @@ -88,8 +91,8 @@ multirow extend synonyms edit_url delete_url multirow foreach synonyms { - set edit_url [export_vars -no_empty -base synonym-form { synonym_id category_id tree_id locale object_id }] - set delete_url [export_vars -no_empty -base synonym-delete { synonym_id category_id tree_id locale object_id }] + set edit_url [export_vars -no_empty -base synonym-form { synonym_id category_id tree_id locale object_id ctx_id}] + set delete_url [export_vars -no_empty -base synonym-delete { synonym_id category_id tree_id locale object_id ctx_id}] } ad_return_template