|
Lines 23-29
use Koha::Database;
Link Here
|
| 23 |
use Koha::Patrons; |
23 |
use Koha::Patrons; |
| 24 |
use t::lib::TestBuilder; |
24 |
use t::lib::TestBuilder; |
| 25 |
|
25 |
|
| 26 |
use Test::More tests => 18; |
26 |
use Test::More tests => 20; |
| 27 |
|
27 |
|
| 28 |
use_ok('Koha::Patron::Password::Recovery'); |
28 |
use_ok('Koha::Patron::Password::Recovery'); |
| 29 |
|
29 |
|
|
Lines 192-196
$letters = C4::Letters::GetQueuedMessages( { borrowernumber => $borrowernumber1,
Link Here
|
| 192 |
ok( $tempuuid1 ne $tempuuid2, "[SendPasswordRecoveryEmail] UPDATE == ON changes uuid in the database and updates the expirydate"); |
192 |
ok( $tempuuid1 ne $tempuuid2, "[SendPasswordRecoveryEmail] UPDATE == ON changes uuid in the database and updates the expirydate"); |
| 193 |
ok( scalar @$letters == 2, "[SendPasswordRecoveryEmail] UPDATE == ON sends a new letter with updated uuid"); |
193 |
ok( scalar @$letters == 2, "[SendPasswordRecoveryEmail] UPDATE == ON sends a new letter with updated uuid"); |
| 194 |
|
194 |
|
|
|
195 |
foreach my $letter (@$letters) { |
| 196 |
ok( $letter->{status} eq 'failed', |
| 197 |
'Test SendPasswordRecoverEmail failed due to TestBuilder Sender not being a valid email address as expected.' ); |
| 198 |
} |
| 199 |
|
| 195 |
$schema->storage->txn_rollback(); |
200 |
$schema->storage->txn_rollback(); |
| 196 |
|
201 |
|
| 197 |
- |
|
|