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

(-)a/C4/Letters.pm (-3 / +7 lines)
Lines 684-690 sub EnqueueLetter ($) { Link Here
684
            }
684
            }
685
        );
685
        );
686
    }
686
    }
687
687
    my $content = $params->{'letter'}->{'content'};
688
    if( $params->{'letter'}->{'content-type'} and ($params->{'letter'}->{'content-type'}=~/html/i ))
689
    {
690
        $content=~s/\n/<br \/>/g;
691
        $content=~s/\r//g;
692
    }
688
    my $dbh       = C4::Context->dbh();
693
    my $dbh       = C4::Context->dbh();
689
    my $statement = << 'ENDSQL';
694
    my $statement = << 'ENDSQL';
690
INSERT INTO message_queue
695
INSERT INTO message_queue
Lines 697-703 ENDSQL Link Here
697
    my $result = $sth->execute(
702
    my $result = $sth->execute(
698
        $params->{'borrowernumber'},              # borrowernumber
703
        $params->{'borrowernumber'},              # borrowernumber
699
        $params->{'letter'}->{'title'},           # subject
704
        $params->{'letter'}->{'title'},           # subject
700
        $params->{'letter'}->{'content'},         # content
705
        $content,         # content
701
        $params->{'letter'}->{'metadata'} || '',  # metadata
706
        $params->{'letter'}->{'metadata'} || '',  # metadata
702
        $params->{'letter'}->{'code'}     || '',  # letter_code
707
        $params->{'letter'}->{'code'}     || '',  # letter_code
703
        $params->{'message_transport_type'},      # message_transport_type
708
        $params->{'message_transport_type'},      # message_transport_type
704
- 

Return to bug 9372