Index: openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-dotlrn-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-dotlrn-create.sql,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-dotlrn-create.sql	24 May 2002 01:58:46 -0000	1.9
+++ openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-dotlrn-create.sql	31 Jul 2002 21:18:32 -0000	1.10
@@ -147,6 +147,15 @@
         impl_alias => 'dotlrn_dotlrn::clone',
         impl_pl => 'TCL'
     );
+
+    foo := acs_sc_impl.new_alias (
+        impl_contract_name => 'dotlrn_applet',
+        impl_name => 'dotlrn_dotlrn',
+        impl_operation_name => 'ChangeEventHandler',
+        impl_alias => 'dotlrn_dotlrn::change_event_handler',
+        impl_pl => 'TCL'
+    );
+
 	-- Add the binding
 	acs_sc_binding.new (
 	    contract_name => 'dotlrn_applet',
