Index: openacs-4/contrib/packages/bcms-ui-base/www/manage/relate-item.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/bcms-ui-base/www/manage/relate-item.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/packages/bcms-ui-base/www/manage/relate-item.tcl 22 Sep 2003 07:36:47 -0000 1.1 +++ openacs-4/contrib/packages/bcms-ui-base/www/manage/relate-item.tcl 4 Oct 2003 08:47:32 -0000 1.2 @@ -3,13 +3,13 @@ } { item_id_one:notnull item_id:optional,multiple + return_url:notnull {name_search:optional ""} {title_search:optional ""} {content_search:optional ""} {display_search_results:optional 0} + {orderby:optional name,asc} {page:optional 1} - {orderby:optional ""} - return_url:notnull } if {[info exists item_id]} { @@ -23,18 +23,15 @@ set package_url [ad_conn package_url] set content_type_search content_revision -set bulk_actions {"Relate" "${package_url}manage/relate-item" "Relate checked items"} +set bulk_actions [list "Relate" "${package_url}manage/relate-item" "Relate checked items"] set bulk_action_export_vars {item_id_one return_url} - template::list::create \ -name related_items \ -multirow related_items \ -key rel_id \ -pass_properties { package_url } \ - -bulk_actions { - "Unrelate" "${package_url}manage/unrelate-item" "Unrelate checked items" - } \ + -bulk_actions [list "Unrelate" "${package_url}manage/unrelate-item" "Unrelate checked items"] \ -bulk_action_export_vars { return_url } \ @@ -52,6 +49,4 @@ bcms::item::list_related_items -item_id $item_id_one -relation_tag pages -multirow_name related_items -revision latest - - set title "Relate Content"