Index: openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl	30 Sep 2001 06:59:15 -0000	1.4
+++ openacs-4/packages/acs-service-contract/tcl/acs-service-contract-procs.tcl	6 Oct 2001 16:30:30 -0000	1.5
@@ -41,7 +41,7 @@
 
     db_0or1row get_alias {
 	select impl_alias, impl_pl
-	from acs_sc_impl_alias
+	from acs_sc_impl_aliases
 	where impl_contract_name = :contract
 	and impl_operation_name = :operation
 	and impl_name = :impl
@@ -82,7 +82,7 @@
 	    operation_nargs,
 	    operation_inputtype_id,
 	    operation_outputtype_id
-	from acs_sc_operation
+	from acs_sc_operations
 	where contract_name = :contract
 	and operation_name = :operation
     }