Index: openacs-4/packages/recruiting/www/admin/list-criteria.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/recruiting/www/admin/list-criteria.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/recruiting/www/admin/list-criteria.tcl 30 Jul 2002 21:33:38 -0000 1.1
+++ openacs-4/packages/recruiting/www/admin/list-criteria.tcl 31 Jul 2002 23:54:00 -0000 1.2
@@ -11,11 +11,20 @@
set package_id [ad_conn package_id]
set user_id [ad_verify_and_get_user_id]
-db_multirow enabled_criteria_types get_enabled_criteria_types "" {
- set disable_url "disable-criteria?[export_vars criteria_id]"
+table::setTitle enabled "Candidate Criteria"
+db_foreach get_enabled_criteria_types {} {
+ table::addUnsortedRow enabled [list "$criteria_name" "(edit) (disable)"]
}
-db_multirow disabled_criteria_types get_disabled_criteria_types "" {
- set enable_url "enable-criteria?[export_vars criteria_id]"
+table::setTitle disabled "Disabled Criteria"
+db_foreach get_disabled_criteria_types {} {
+ table::addUnsortedRow disabled [list "$criteria_name" "(enable)"]
+
}
+table::setTitle options "Options"
+table::addUnsortedRow options [list "Add New Criteria"]
+
+set context_bar [list [list "../" "Recruiting"] [list "index" "Admin"] "Criteria Types"]
+
+ad_return_template