Index: openacs-4/packages/curriculum/www/admin/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/curriculum/www/admin/index.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/curriculum/www/admin/index.tcl 3 Jun 2003 10:32:38 -0000 1.1 +++ openacs-4/packages/curriculum/www/admin/index.tcl 13 Jun 2003 11:44:34 -0000 1.2 @@ -15,19 +15,4 @@ set title "Curriculum" set context {} -# Create the tab strip that filters curriculums by workflow state. -set url [ad_conn url] - -template::tabstrip create states -base_url $url - -set workflow_id [curriculum::get_instance_workflow_id] -array set state_data [workflow::state::fsm::get_all_info -workflow_id $workflow_id] - -foreach state_id $state_data(state_ids) { - array set state $state_data($state_id) - template::tabstrip add_tab states $state(state_id) $state(pretty_name) $state(short_name) -} - -template::tabstrip add_tab states any "Any" any - ad_return_template