From 25c1d9c35a6282711164881de734d3c6d7333619 Mon Sep 17 00:00:00 2001 From: tipaul Date: Wed, 23 May 2007 17:35:59 +0000 Subject: [PATCH] Bug Fixing : managing abouttoexpire function for irregular serial Need more work. HDL from Paul's machine --- C4/Serials.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/Serials.pm b/C4/Serials.pm index 88085d4bbd..1a1efeb34f 100644 --- a/C4/Serials.pm +++ b/C4/Serials.pm @@ -1745,7 +1745,7 @@ sub HasSubscriptionExpired { my ($subscriptionid) = @_; my $dbh = C4::Context->dbh; my $subscription = GetSubscription($subscriptionid); - if ($subscription->{periodicity}){ + if ($subscription->{periodicity}>0){ my $expirationdate = GetExpirationDate($subscriptionid); my $query = qq| SELECT max(planneddate) -- 2.39.5