Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 15585: Remove "shift on reference is experimental" warning

Browse source 
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

Signed-off-by: Brendan Gallagher brendan@bywatersolutions.com
This commit is contained in:
Jonathan Druart 2016-03-22 11:04:41 +00:00 committed by Brendan Gallagher
parent db0ecc3cc5
commit 08eabd2b96
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
t/db_dependent/Passwordrecovery.t
View file

@ -134,7 +134,7 @@ ok( Koha::Patron::Password::Recovery::CompletePasswordRecovery($uuid2) == 0, "[C
# Koha::Patron::Password::Recovery::SendPasswordRecoveryEmail #
###############################################################
my $borrower = shift [ Koha::Patrons->search( { userid => $userid1 } ) ];
my $borrower = Koha::Patrons->search( { userid => $userid1 } )->next;
ok( Koha::Patron::Password::Recovery::SendPasswordRecoveryEmail($borrower, $email1, 0) == 1, "[SendPasswordRecoveryEmail] Returns 1 on success" );
my $letters = C4::Letters::GetQueuedMessages( { borrowernumber => $borrowernumber1, limit => 99 } );
ok( scalar @$letters == 1, "[SendPasswordRecoveryEmail] There is a letter in the queue for our borrower");