From be1d09c43b65612154e020240c687c590f6ed5a1 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Tue, 23 Dec 2014 16:51:41 +0100 Subject: [PATCH] Bug 7677: Fix tests They don't pass since bug 12098 has been pushed. Signed-off-by: Brendan Gallagher http://bugs.koha-community.org/show_bug.cgi?id=7767 --- t/db_dependent/Serials_2.t | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/t/db_dependent/Serials_2.t b/t/db_dependent/Serials_2.t index 88f507f..b3a74db 100644 --- a/t/db_dependent/Serials_2.t +++ b/t/db_dependent/Serials_2.t @@ -1,7 +1,7 @@ #!/usr/bin/perl use Modern::Perl; -use Test::More tests => 36; +use Test::More tests => 40; use MARC::Record; @@ -205,14 +205,14 @@ is( C4::Serials::can_show_subscription($subscription_from_another_branch), 1, ); # GetPreviousSerialid -my $serialid1 = NewIssue( 1, $subscriptionid, $biblionumber, 2 ); -my $serialid2 = NewIssue( 2, $subscriptionid, $biblionumber, 2 ); -my $serialid3 = NewIssue( 3, $subscriptionid, $biblionumber, 2 ); - -is( GetPreviousSerialid( $subscriptionid ), $serialid2, "get previous serialid without parameter"); -is( GetPreviousSerialid( $subscriptionid, 1 ), $serialid2, "get previous serialid with 1" ); -is( GetPreviousSerialid( $subscriptionid, 2 ), $serialid1, "get previous serialid with 2" ); -is( GetPreviousSerialid( $subscriptionid, 3 ), undef, "get previous serialid with 3, does not exist" ); +my $serialid1 = NewIssue( 1, $subscriptionid_from_my_branch, $biblionumber, 2 ); +my $serialid2 = NewIssue( 2, $subscriptionid_from_my_branch, $biblionumber, 2 ); +my $serialid3 = NewIssue( 3, $subscriptionid_from_my_branch, $biblionumber, 2 ); + +is( GetPreviousSerialid( $subscriptionid_from_my_branch ), $serialid2, "get previous serialid without parameter"); +is( GetPreviousSerialid( $subscriptionid_from_my_branch, 1 ), $serialid2, "get previous serialid with 1" ); +is( GetPreviousSerialid( $subscriptionid_from_my_branch, 2 ), $serialid1, "get previous serialid with 2" ); +is( GetPreviousSerialid( $subscriptionid_from_my_branch, 3 ), undef, "get previous serialid with 3, does not exist" ); $dbh->rollback; -- 1.7.10.4