Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v diff -u -r1.211.2.4 -r1.211.2.5 --- openacs-4/packages/dotlrn/tcl/community-procs.tcl 29 Jul 2016 13:20:14 -0000 1.211.2.4 +++ openacs-4/packages/dotlrn/tcl/community-procs.tcl 12 Sep 2016 11:17:13 -0000 1.211.2.5 @@ -2343,9 +2343,9 @@ } if {$email_send_to eq ""} { - set to_addr [cc_email_from_party $to_user] + set to_addr [party::email -party_id $to_user] } else { - set to_addr [cc_email_from_party $email_send_to] + set to_addr [party::email -party_id $email_send_to] } set extra_headers [ns_set create] Index: openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl,v diff -u -r1.61.2.1 -r1.61.2.2 --- openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl 11 Sep 2015 11:40:40 -0000 1.61.2.1 +++ openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl 12 Sep 2016 11:17:13 -0000 1.61.2.2 @@ -97,7 +97,7 @@ # default ID to email address if {$id eq ""} { - set id [cc_email_from_party $user_id] + set id [party::email -party_id $user_id] } # set up extra vars Index: openacs-4/packages/dotlrn/tcl/dotlrn-user-extension-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-user-extension-procs.tcl,v diff -u -r1.9.14.1 -r1.9.14.2 --- openacs-4/packages/dotlrn/tcl/dotlrn-user-extension-procs.tcl 11 Sep 2015 11:40:40 -0000 1.9.14.1 +++ openacs-4/packages/dotlrn/tcl/dotlrn-user-extension-procs.tcl 12 Sep 2016 11:17:13 -0000 1.9.14.2 @@ -39,7 +39,7 @@ A new user has been added: process dotLRN specific stuff } { # Get the user's email address - set email [cc_email_from_party $user_id] + set email [party::email -party_id $user_id] # Loop through patterns foreach pattern [automatic_email_patterns] {