From 705b05ad03228fdb6ea5dfc9f83f10ef046d6cf5 Mon Sep 17 00:00:00 2001 From: bob_lyon Date: Tue, 28 Nov 2006 01:34:47 +0000 Subject: [PATCH] Fixed problem with irregularity - helps to call the right subroutine --- C4/Bull.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/Bull.pm b/C4/Bull.pm index 1df18dbbad..502b784a5d 100755 --- a/C4/Bull.pm +++ b/C4/Bull.pm @@ -1570,7 +1570,7 @@ sub old_serialchangestatus { $sth->execute($subscriptionid); my $val = $sth->fetchrow_hashref; # next date (calculated from actual date & frequency parameters) - my $nextplanneddate = Get_Next_Date($planneddate,$val); + my $nextplanneddate = GetNextDate($planneddate,$val); # next issue number # my ($newserialseq,$newlastvalue1,$newlastvalue2,$newlastvalue3,$newinnerloop1,$newinnerloop2,$newinnerloop3) = Get_Next_Seq($val); my ($newserialseq,$newlastvalue1,$newlastvalue2,$newlastvalue3) = New_Get_Next_Seq($val,$nextplanneddate); -- 2.39.5