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

(-)a/C4/Letters.pm (-3 / +24 lines)
Lines 1451-1456 sub _send_message_by_email { Link Here
1451
        );
1451
        );
1452
        return;
1452
        return;
1453
    };
1453
    };
1454
1455
    my $bcc_address = C4::Context->preference('NoticeBcc');
1456
1457
    if ( C4::Context->preference('EmailFieldPrimary') eq "MULTI" and C4::Context->preference('EmailRecipientField') eq "cc" ) {
1458
        $cc_address = join( ',', $cc_address, $to_address );
1459
        _update_message_cc_address( $message->{'message_id'}, $cc_address );
1460
        if ( $count_guarantor_address ) {
1461
            $to_address = shift @guarantor_address;
1462
        } else {
1463
            $to_address = undef;
1464
        }
1465
        _update_message_to_address( $message->{'message_id'}, $to_address );
1466
    } elsif ( C4::Context->preference('EmailFieldPrimary') eq "MULTI" and C4::Context->preference('EmailRecipientField') eq "bcc" ) {
1467
        $bcc_address = join( ',', $bcc_address, $to_address );
1468
        if ( $count_guarantor_address ) {
1469
            $to_address = shift @guarantor_address;
1470
        } else {
1471
            $to_address = undef;
1472
        }
1473
        _update_message_to_address( $message->{'message_id'}, $to_address );
1474
    }
1475
1454
    my $email;
1476
    my $email;
1455
1477
1456
    try {
1478
    try {
Lines 1458-1465 sub _send_message_by_email { Link Here
1458
        my $params = {
1480
        my $params = {
1459
            to => $to_address,
1481
            to => $to_address,
1460
            (
1482
            (
1461
                C4::Context->preference('NoticeBcc')
1483
                $bcc_address
1462
                ? ( bcc => C4::Context->preference('NoticeBcc') )
1484
                ? ( bcc => $bcc_address )
1463
                : ()
1485
                : ()
1464
            ),
1486
            ),
1465
            (
1487
            (
1466
- 

Return to bug 37598