From 77dc2a7f7971bcf17464876aef0e20321db7ae7d Mon Sep 17 00:00:00 2001
From: toins <toins>
Date: Wed, 12 Jul 2006 17:18:10 +0000
Subject: [PATCH] GetSubscription... renamed to CountSubscription...

---
 catalogue/MARCdetail.pl | 2 +-
 catalogue/detail.pl     | 2 +-
 opac/opac-ISBDdetail.pl | 2 +-
 opac/opac-detail.pl     | 6 +++---
 4 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/catalogue/MARCdetail.pl b/catalogue/MARCdetail.pl
index 8b0fb49c17..6cd9c05cb5 100755
--- a/catalogue/MARCdetail.pl
+++ b/catalogue/MARCdetail.pl
@@ -226,7 +226,7 @@ foreach my $subfield_code (keys(%witness)) {
 	push(@header_value_loop, \%header_value);
 }
 
-my $subscriptionsnumber = GetSubscriptionFromBiblionumber($biblionumber);
+my $subscriptionsnumber = CountSubscriptionFromBiblionumber($biblionumber);
 $template->param(item_loop => \@item_value_loop,
 						item_header_loop => \@header_value_loop,
 						biblionumber => $biblionumber,
diff --git a/catalogue/detail.pl b/catalogue/detail.pl
index 7f069294cb..4c6a2d103d 100755
--- a/catalogue/detail.pl
+++ b/catalogue/detail.pl
@@ -31,7 +31,7 @@ my $dat                                   = &bibdata($biblionumber);
 my ($authorcount, $addauthor)             = &getaddauthor($biblionumber);
 my ($webbiblioitemcount, @webbiblioitems) = &getwebbiblioitems($biblionumber);
 my ($websitecount, @websites)             = &getwebsites($biblionumber);
-my $subscriptionsnumber = GetSubscriptionFromBiblionumber($biblionumber);
+my $subscriptionsnumber = CountSubscriptionFromBiblionumber($biblionumber);
 
 $dat->{'count'}=@items;
 
diff --git a/opac/opac-ISBDdetail.pl b/opac/opac-ISBDdetail.pl
index b23b03995e..2811aa1f62 100755
--- a/opac/opac-ISBDdetail.pl
+++ b/opac/opac-ISBDdetail.pl
@@ -76,7 +76,7 @@ my $tagslib = &MARCgettagslib($dbh,1,$itemtype);
 my $record =MARCgetbiblio($dbh,$bibid);
 
 #coping with subscriptions
-my $subscriptionsnumber = GetSubscriptionFromBiblionumber($biblionumber);
+my $subscriptionsnumber = CountSubscriptionFromBiblionumber($biblionumber);
 my $dat = MARCmarc2koha($dbh,$record);
 my @subscriptions = GetSubscriptions($dat->{title},$dat->{issn},$biblionumber);
 my @subs;
diff --git a/opac/opac-detail.pl b/opac/opac-detail.pl
index 84f329e139..4cf4e9a336 100755
--- a/opac/opac-detail.pl
+++ b/opac/opac-detail.pl
@@ -51,10 +51,10 @@ my $dat = &bibdata($biblionumber);
 my ( $authorcount,        $addauthor )      = &getaddauthor($biblionumber);
 my ( $webbiblioitemcount, @webbiblioitems ) = &getwebbiblioitems($biblionumber);
 my ( $websitecount,       @websites )       = &getwebsites($biblionumber);
-my $subscriptionsnumber = GetSubscriptionFromBiblionumber($biblionumber);
+my $subscriptionsnumber = CountSubscriptionFromBiblionumber($biblionumber);
 
 #coping with subscriptions
-my $subscriptionsnumber = GetSubscriptionFromBiblionumber($biblionumber);
+my $subscriptionsnumber = CountSubscriptionFromBiblionumber($biblionumber);
 my @subscriptions       =
   GetSubscriptions( $dat->{title}, $dat->{issn}, $biblionumber );
 my @subs;
@@ -144,7 +144,7 @@ my $titlewords   = \@title;
 my $authorwords  = \@author;
 
 #coping with subscriptions
-my $subscriptionsnumber = GetSubscriptionFromBiblionumber($biblionumber);
+my $subscriptionsnumber = CountSubscriptionFromBiblionumber($biblionumber);
 my @subscriptions       =
   GetSubscriptions( $dat->{title}, $dat->{issn}, $biblionumber );
 my @subs;
-- 
2.39.5