Lines 29-34
use Email::Sender::Failure;
Link Here
|
29 |
|
29 |
|
30 |
use MARC::Record; |
30 |
use MARC::Record; |
31 |
|
31 |
|
|
|
32 |
use t::lib::Dates; |
33 |
|
32 |
use utf8; |
34 |
use utf8; |
33 |
|
35 |
|
34 |
my ( $email_object, $sendmail_params ); |
36 |
my ( $email_object, $sendmail_params ); |
Lines 153-159
is( $messages->[0]->{content}, $my_message->{letter}->{content}, 'EnqueueLetter
Link Here
|
153 |
is( $messages->[0]->{message_transport_type}, $my_message->{message_transport_type}, 'EnqueueLetter stores the message type correctly' ); |
155 |
is( $messages->[0]->{message_transport_type}, $my_message->{message_transport_type}, 'EnqueueLetter stores the message type correctly' ); |
154 |
is( $messages->[0]->{status}, 'pending', 'EnqueueLetter stores the status pending correctly' ); |
156 |
is( $messages->[0]->{status}, 'pending', 'EnqueueLetter stores the status pending correctly' ); |
155 |
isnt( $messages->[0]->{time_queued}, undef, 'Time queued inserted by default in message_queue table' ); |
157 |
isnt( $messages->[0]->{time_queued}, undef, 'Time queued inserted by default in message_queue table' ); |
156 |
is( $messages->[0]->{updated_on}, $messages->[0]->{time_queued}, 'Time status changed equals time queued when created in message_queue table' ); |
158 |
is( |
|
|
159 |
t::lib::Dates::compare( $messages->[0]->{updated_on}, $messages->[0]->{time_queued} ), 0, |
160 |
'Time status changed equals time queued when created in message_queue table' |
161 |
); |
157 |
is( $messages->[0]->{failure_code}, '', 'Failure code for successful message correctly empty'); |
162 |
is( $messages->[0]->{failure_code}, '', 'Failure code for successful message correctly empty'); |
158 |
|
163 |
|
159 |
# Setting time_queued to something else than now |
164 |
# Setting time_queued to something else than now |
160 |
- |
|
|