Index: openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-dotlrn-init.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-dotlrn/sql/oracle/Attic/dotlrn-dotlrn-init.sql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-dotlrn-init.sql 9 Oct 2001 03:04:20 -0000 1.1 +++ openacs-4/packages/dotlrn-dotlrn/sql/oracle/dotlrn-dotlrn-init.sql 9 Oct 2001 03:36:13 -0000 1.2 @@ -23,6 +23,15 @@ -- add all the hooks + -- GetPrettyName + foo := acs_sc_impl.new_alias ( + 'dotlrn_applet', + 'dotlrn_dotlrn', + 'GetPrettyName', + 'dotlrn_dotlrn::get_pretty_name', + 'TCL' + ); + -- AddApplet foo := acs_sc_impl.new_alias ( 'dotlrn_applet', @@ -58,6 +67,12 @@ 'dotlrn_dotlrn::remove_user', 'TCL' ); + + -- Add the binding + foo := acs_sc_binding.new ( + contract_name => 'dotlrn_applet', + impl_name => 'dotlrn_dotlrn' + ); end; / show errors