Index: openacs-4/packages/recruiting/tcl/dotlrn-recruiting-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/recruiting/tcl/dotlrn-recruiting-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/recruiting/tcl/dotlrn-recruiting-procs.tcl	30 Jul 2002 15:59:42 -0000	1.1
+++ openacs-4/packages/recruiting/tcl/dotlrn-recruiting-procs.tcl	30 Jul 2002 17:57:17 -0000	1.2
@@ -131,7 +131,7 @@
     } {
         get a recruiting criteria
     } {
-        db_1row get_recruiting_criteria {}
+        db_1row get_criteria {}
 
         set recruiting_criteria(criteria_id) $criteria_id
         set recruiting_criteria(package_id) $package_id
@@ -243,7 +243,8 @@
     } {
         delete an interview
     } {
-        db_exec_plsql delete_interview
+        db_exec_plsql delete_ratings {}
+        db_exec_plsql delete_interview {}
     }
 
     ad_proc -public get {