[Koha-cvs] koha/opac opac-detail.pl opac-ISBDdetail.pl
Antoine Farnault
antoine at koha-fr.org
Wed Jul 12 19:19:39 CEST 2006
CVSROOT: /sources/koha
Module name: koha
Changes by: Antoine Farnault <toins> 06/07/12 17:19:39
Modified files:
opac : opac-detail.pl opac-ISBDdetail.pl
Log message:
GetSubscription... renamed to CountSubscription...
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/opac/opac-detail.pl?cvsroot=koha&r1=1.30&r2=1.31
http://cvs.savannah.gnu.org/viewcvs/koha/opac/opac-ISBDdetail.pl?cvsroot=koha&r1=1.14&r2=1.15
Patches:
Index: opac-detail.pl
===================================================================
RCS file: /sources/koha/koha/opac/opac-detail.pl,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -b -r1.30 -r1.31
--- opac-detail.pl 7 Jul 2006 09:00:12 -0000 1.30
+++ opac-detail.pl 12 Jul 2006 17:19:39 -0000 1.31
@@ -17,7 +17,7 @@
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
# Suite 330, Boston, MA 02111-1307 USA
-# $Id: opac-detail.pl,v 1.30 2006/07/07 09:00:12 toins Exp $
+# $Id: opac-detail.pl,v 1.31 2006/07/12 17:19:39 toins Exp $
use strict;
require Exporter;
@@ -51,10 +51,10 @@
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 $authorwords = \@author;
#coping with subscriptions
-my $subscriptionsnumber = GetSubscriptionFromBiblionumber($biblionumber);
+my $subscriptionsnumber = CountSubscriptionFromBiblionumber($biblionumber);
my @subscriptions =
GetSubscriptions( $dat->{title}, $dat->{issn}, $biblionumber );
my @subs;
Index: opac-ISBDdetail.pl
===================================================================
RCS file: /sources/koha/koha/opac/opac-ISBDdetail.pl,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -b -r1.14 -r1.15
--- opac-ISBDdetail.pl 7 Jul 2006 09:00:12 -0000 1.14
+++ opac-ISBDdetail.pl 12 Jul 2006 17:19:39 -0000 1.15
@@ -17,7 +17,7 @@
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
# Suite 330, Boston, MA 02111-1307 USA
-# $Id: opac-ISBDdetail.pl,v 1.14 2006/07/07 09:00:12 toins Exp $
+# $Id: opac-ISBDdetail.pl,v 1.15 2006/07/12 17:19:39 toins Exp $
=head1 NAME
@@ -76,7 +76,7 @@
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;
More information about the Koha-cvs
mailing list