Index: openacs-4/packages/dotlrn/sql/oracle/user-extension-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/user-extension-create.sql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn/sql/oracle/user-extension-create.sql 6 May 2002 23:55:01 -0000 1.1 +++ openacs-4/packages/dotlrn/sql/oracle/user-extension-create.sql 30 May 2002 22:04:58 -0000 1.2 @@ -28,67 +28,67 @@ declare - foo integer; + foo integer; begin - -- create the implementation - foo := acs_sc_impl.new ( - 'UserData', - 'dotlrn_user_extension', - 'dotlrn_user_extension' - ); - -- add all the hooks + -- create the implementation + foo := acs_sc_impl.new ( + 'UserData', + 'dotlrn_user_extension', + 'dotlrn_user_extension' + ); - -- UserNew - foo := acs_sc_impl.new_alias ( - 'UserData', - 'dotlrn_user_extension', - 'UserNew', - 'dotlrn_user_extension::user_new', - 'TCL' - ); + -- UserNew + foo := acs_sc_impl.new_alias ( + 'UserData', + 'dotlrn_user_extension', + 'UserNew', + 'dotlrn_user_extension::user_new', + 'TCL' + ); - -- UserNew - foo := acs_sc_impl.new_alias ( - 'UserData', - 'dotlrn_user_extension', - 'UserApprove', - 'dotlrn_user_extension::user_approve', - 'TCL' - ); + -- UserNew + foo := acs_sc_impl.new_alias ( + 'UserData', + 'dotlrn_user_extension', + 'UserApprove', + 'dotlrn_user_extension::user_approve', + 'TCL' + ); - -- UserNew - foo := acs_sc_impl.new_alias ( - 'UserData', - 'dotlrn_user_extension', - 'UserDeapprove', - 'dotlrn_user_extension::user_deapprove', - 'TCL' - ); + -- UserNew + foo := acs_sc_impl.new_alias ( + 'UserData', + 'dotlrn_user_extension', + 'UserDeapprove', + 'dotlrn_user_extension::user_deapprove', + 'TCL' + ); - -- UserNew - foo := acs_sc_impl.new_alias ( - 'UserData', - 'dotlrn_user_extension', - 'UserModify', - 'dotlrn_user_extension::user_modify', - 'TCL' - ); + -- UserNew + foo := acs_sc_impl.new_alias ( + 'UserData', + 'dotlrn_user_extension', + 'UserModify', + 'dotlrn_user_extension::user_modify', + 'TCL' + ); - -- UserNew - foo := acs_sc_impl.new_alias ( - 'UserData', - 'dotlrn_user_extension', - 'UserDelete', - 'dotlrn_user_extension::user_delete', - 'TCL' - ); + -- UserNew + foo := acs_sc_impl.new_alias ( + 'UserData', + 'dotlrn_user_extension', + 'UserDelete', + 'dotlrn_user_extension::user_delete', + 'TCL' + ); - -- Add the binding - acs_sc_binding.new ( - contract_name => 'UserData', - impl_name => 'dotlrn_user_extension' - ); + -- Add the binding + acs_sc_binding.new ( + contract_name => 'UserData', + impl_name => 'dotlrn_user_extension' + ); + end; / show errors