Index: openacs-4/packages/recruiting/www/rating-sheet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/recruiting/www/rating-sheet.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/recruiting/www/rating-sheet.tcl	2 Aug 2002 16:48:26 -0000	1.2
+++ openacs-4/packages/recruiting/www/rating-sheet.tcl	9 Aug 2002 20:30:51 -0000	1.3
@@ -23,27 +23,34 @@
 set interviewer_id $interview_info(interviewer_id)
 set candidate_id $interview_info(candidate_id)
 
-table::setTitle ratings "Your ratings for $candidate_info(first_name) $candidate_info(last_name)"
-table::setColumnHeadings ratings [list "Criteria" "Rating"]
-table::setColumnAlignment ratings [list left center]
-table::setExportVars ratings [export_vars interview_id]
+ui::table::set_title ratings "Your ratings for $candidate_info(first_name) $candidate_info(last_name)"
+ui::table::set_column_headings ratings [list "Criteria" "Rating"]
+ui::table::set_column_alignment ratings [list left center]
+ui::table::set_export_vars ratings [export_vars interview_id]
 
 db_foreach get_ratings {} {
-    table::addSortableRow ratings [list "<b>$criteria_name</b><br>$description" "<b>$rating</b>"]
+    ui::table::add_sortable_row ratings [list "<b>$criteria_name</b><br>$description" "<b>$rating</b>"]
 } if_no_rows {
-    table::addSortableRow ratings [list "You has not made any ratings for $candidate_info(first_name) $candidate_info(last_name)"]
+    ui::table::add_sortable_row ratings [list "You has not made any ratings for $candidate_info(first_name) $candidate_info(last_name)"]
 }
 
-table::setTitle summary "Summary Info"
-table::addUnsortedRow summary [list "Average rating:" [db_string get_average_rating {}]]
-table::addUnsortedRow summary [list "Hiring suggestion:" [db_string get_should_hire_p {}]]
+ui::table::set_title summary "Summary Info"
+ui::table::add_unsorted_row summary [list "Average rating:" [db_string get_average_rating {}]]
+ui::table::add_unsorted_row summary [list "Hiring suggestion:" [db_string get_should_hire_p {}]]
 
-table::setTitle comments "Comments"
-table::addUnsortedRow comments [list $interview_info(comment)]
+ui::table::set_title comments "Comments"
+ui::table::add_unsorted_row comments [list $interview_info(comment)]
 
 set context_bar [list \
         [list "index" "Recruiting"] \
         [list "my-completed-interviews" "My Completed Interviews"] \
         "Interview Ratings"]
 
 ad_return_template
+
+
+
+
+
+
+