Fisheye: Tag 1.3.2.4 refers to a dead (removed) revision in file `openacs-4/packages/assessment/sql/postgresql/assessment-actions-create-p.sql'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/assessment/sql/postgresql/assessment-actions-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/sql/postgresql/assessment-actions-create.sql,v diff -u -r1.13.2.4 -r1.13.2.5 --- openacs-4/packages/assessment/sql/postgresql/assessment-actions-create.sql 26 Aug 2014 11:36:55 -0000 1.13.2.4 +++ openacs-4/packages/assessment/sql/postgresql/assessment-actions-create.sql 28 Aug 2014 11:27:54 -0000 1.13.2.5 @@ -172,7 +172,7 @@ select define_function_args('as_action__default_actions','context_id,creation_user,package_id'); -- --- procedure as_action__default_actions/2 +-- procedure as_action__default_actions/3 -- CREATE OR REPLACE FUNCTION as_action__default_actions( new__context_id integer, Index: openacs-4/packages/assessment/sql/postgresql/upgrade/upgrade-2.8.1a1-2.8.1a2.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/sql/postgresql/upgrade/upgrade-2.8.1a1-2.8.1a2.sql,v diff -u -r1.1.2.1 -r1.1.2.2 --- openacs-4/packages/assessment/sql/postgresql/upgrade/upgrade-2.8.1a1-2.8.1a2.sql 26 Aug 2014 11:53:09 -0000 1.1.2.1 +++ openacs-4/packages/assessment/sql/postgresql/upgrade/upgrade-2.8.1a1-2.8.1a2.sql 28 Aug 2014 11:27:55 -0000 1.1.2.2 @@ -1,84 +1,9 @@ -CREATE OR REPLACE FUNCTION as_action__default_actions( - new__context_id integer, - new__creation_user integer -) RETURNS integer AS $$ -DECLARE - v_action_id integer; - v_parameter_id integer; -BEGIN - v_action_id := as_action__new ( - null, - 'Register User', - 'Register new users', - 'set password [ad_generate_random_string] -db_transaction { -array set user_new_info [auth::create_user -username $user_name -email $email -first_names $first_names -last_name $last_name -password $password] -} -set admin_user_id [as::actions::get_admin_user_id] -set administration_name [db_string admin_name "select first_names || '' '' || last_name from persons where person_id = :admin_user_id"] -set system_name [ad_system_name] -set system_url [parameter::get -package_id [ad_acs_kernel_id] -parameter SystemURL -default ""]. -set admin_email [db_string unused "select email from parties where party_id = :admin_user_id"] -set message "$first_names $last_name, -You have been added as a user to $system_name -at $system_url -Login information: -Email: $email -Password: $password -(you may change your password after you log in) -Thank you, -$administration_name" -acs_mail_lite::send -to_addr "$email" -from_addr "$admin_email" -subject "You have been added as a user to [ad_system_name] at [ad_url]" -body "$message"', - new__context_id, - new__creation_user - ); -v_parameter_id:= nextval('as_action_params_parameter_id'); -insert into as_action_params (parameter_id, action_id,type, varname, description) values (v_parameter_id,v_action_id,'n','first_names','First Names of the User'); -v_parameter_id:= nextval('as_action_params_parameter_id'); -insert into as_action_params (parameter_id, action_id,type, varname, description) values (v_parameter_id,v_action_id,'n','last_name','Last Name of the User'); -v_parameter_id:= nextval('as_action_params_parameter_id'); -insert into as_action_params (parameter_id, action_id,type, varname, description) values (v_parameter_id,v_action_id,'n','email','Email of the User'); -v_parameter_id:= nextval('as_action_params_parameter_id'); -insert into as_action_params (parameter_id, action_id,type, varname, description) values (v_parameter_id,v_action_id,'n','user_name','User name of the User'); - -v_action_id:= as_action__new ( - null, - 'Event Registration', - 'Register user to event', - 'set user_id [ad_conn user_id] -events::registration::new -event_id $event_id -user_id $user_id', - new__context_id, - new__creation_user - ); - -v_parameter_id:= nextval('as_action_params_parameter_id'); -insert into as_action_params (parameter_id, action_id,type, varname, description,query) values (v_parameter_id,v_action_id,'q','event_id','Event to add the user', 'select event_id,event_id from acs_events'); - -v_action_id:= as_action__new ( - null, - 'Add to Community', - 'Add user to a community', - 'set user_id [ad_conn user_id] -dotlrn_privacy::set_user_guest_p -user_id $user_id -value "t" -dotlrn::user_add -can_browse -user_id $user_id -dotlrn_community::add_user_to_community -community_id $community_id -user_id $user_id', - new__context_id, - new__creation_user - ); - -v_parameter_id:= nextval('as_action_params_parameter_id'); -insert into as_action_params (parameter_id, action_id,type, varname, description,query) values (v_parameter_id,v_action_id,'q','community_id','Community to add the user', 'select pretty_name,community_id from dotlrn_communities'); - -END; -$$ LANGUAGE plpgsql; - - -- added select define_function_args('as_action__default_actions','context_id,creation_user,package_id'); -- --- procedure as_action__default_actions/2 +-- procedure as_action__default_actions/3 -- CREATE OR REPLACE FUNCTION as_action__default_actions( new__context_id integer,