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

(-)a/C4/Letters.pm (-2 / +3 lines)
Lines 1293-1299 sub _get_unsent_messages { Link Here
1293
1293
1294
    my $dbh = C4::Context->dbh();
1294
    my $dbh = C4::Context->dbh();
1295
    my $statement = qq{
1295
    my $statement = qq{
1296
        SELECT mq.message_id, mq.borrowernumber, mq.subject, mq.content, mq.message_transport_type, mq.status, mq.time_queued, mq.from_address, mq.reply_address, mq.to_address, mq.content_type, b.branchcode, mq.letter_code, mq.failure_code
1296
        SELECT mq.message_id, mq.borrowernumber, mq.subject, mq.content, mq.message_transport_type, mq.status, mq.time_queued, mq.from_address, mq.reply_address, mq.to_address, mq.content_type, b.branchcode, mq.letter_code, mq.failure_code, mq.letter_id
1297
        FROM message_queue mq
1297
        FROM message_queue mq
1298
        LEFT JOIN borrowers b ON b.borrowernumber = mq.borrowernumber
1298
        LEFT JOIN borrowers b ON b.borrowernumber = mq.borrowernumber
1299
        WHERE status = ?
1299
        WHERE status = ?
Lines 1464-1469 sub _send_message_by_email { Link Here
1464
            $email->create($params);
1464
            $email->create($params);
1465
        } else {
1465
        } else {
1466
            $email = Koha::Email->create($params);
1466
            $email = Koha::Email->create($params);
1467
            $email->header('X-Koha-Letter-Id', $message->{letter_id} );
1468
            $email->header('X-Koha-Message-Id', $message->{id} );
1467
            if ($is_html) {
1469
            if ($is_html) {
1468
                $email->html_body( _wrap_html( $content, $subject ) );
1470
                $email->html_body( _wrap_html( $content, $subject ) );
1469
            } else {
1471
            } else {
1470
- 

Return to bug 31627