Index: openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-create.sql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-create.sql	10 May 2002 06:35:14 -0000	1.4
+++ openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-members-create.sql	31 Jul 2002 21:18:32 -0000	1.5
@@ -147,6 +147,14 @@
         impl_pl => 'TCL'
     );
 
+    foo := acs_sc_impl.new_alias (
+        impl_contract_name => 'dotlrn_applet',
+        impl_name => 'dotlrn_members',
+        impl_operation_name => 'ChangeEventHandler',
+        impl_alias => 'dotlrn_members::change_event_handler',
+        impl_pl => 'TCL'
+    );
+
 	-- Add the binding
 	acs_sc_binding.new (
 	    contract_name => 'dotlrn_applet',
