Forum OpenACS Development: Re: Set "Send email to this user" by default

Collapse
Posted by Iuri Sampaio on
it has been great playing with the code. I just make the mess then the error comes up and I understand how the pieces work...

By the way i was totaly wrong,
the page "packages/acs-subsite/www/members/index.tcl"
just call the api to list the info

The default value to display emails has to be set in the procedure that generates the user info and how it will display.

I browsed
auth::create_user

http://www.openacs.org/api-doc/proc-view?proc=auth::create_user&source_p=1&version_id=

But i couldn't find yet

Collapse
Posted by Iuri Sampaio on
So far,

I found auth::create_local_account (public)
http://www.openacs.org/api-doc/proc-view?proc=auth::create_local_account&source_p=1&version_id=

and this line of code in the procedure:
******

# Default a local account username
if { $user_info(authority_id) == [auth::authority::local] && [auth::UseEmailForLoginP] && [empty_string_p $username] } {

# Generate a username that's guaranteed to be unique
****

took me to auth::UseEmailForLoginP
http://www.openacs.org/api-doc/proc-view?proc=auth::UseEmailForLoginP&source_p=1&version_id=

which i have
***********
return [parameter::get -boolean -parameter UseEmailForLoginP -package_id [ad_acs_kernel_id] -default 1]

*******************

then i set the defuealt value "2" that corresponds to "Send-email-to this-user"

create the user. but it didn;t work