View | Details | Raw Unified | Return to bug 6870
Collapse All | Expand All

(-)a/opac/opac-userupdate.pl (-2 / +6 lines)
Lines 48-53 my ( $template, $borrowernumber, $cookie ) = get_template_and_user( Link Here
48
48
49
# get borrower information ....
49
# get borrower information ....
50
my ( $borr ) = GetMemberDetails( $borrowernumber );
50
my ( $borr ) = GetMemberDetails( $borrowernumber );
51
my ( $patronemail ) = GetFirstValidEmailAddress($borrowernumber);
51
my $lib = GetBranchDetail($borr->{'branchcode'});
52
my $lib = GetBranchDetail($borr->{'branchcode'});
52
53
53
# handle the new information....
54
# handle the new information....
Lines 80-85 if ( !$updateemailaddress || $updateemailaddress eq '' ) { Link Here
80
    exit;
81
    exit;
81
}
82
}
82
83
84
if ( !$patronemail || $patronemail eq '' ) {
85
	$patronemail = $updateemailaddress;
86
};
87
83
if ( $query->param('modify') ) {
88
if ( $query->param('modify') ) {
84
89
85
    # get all the fields:
90
    # get all the fields:
Lines 117-123 EOF Link Here
117
    $message .= "\n\nThanks,\nKoha\n\n";
122
    $message .= "\n\nThanks,\nKoha\n\n";
118
    my %mail = (
123
    my %mail = (
119
        To      => $updateemailaddress,
124
        To      => $updateemailaddress,
120
        From    => $updateemailaddress,
125
        From    => $patronemail,
121
        Subject => "User Request for update of Record.",
126
        Subject => "User Request for update of Record.",
122
        Message => $message,
127
        Message => $message,
123
        'Content-Type' => 'text/plain; charset="utf8"',
128
        'Content-Type' => 'text/plain; charset="utf8"',
124
- 

Return to bug 6870