[Koha-cvs] koha/C4 Labels.pm [dev_week]
Mason James
szrj1m at yahoo.com
Fri Jul 20 06:42:57 CEST 2007
CVSROOT: /sources/koha
Module name: koha
Branch: dev_week
Changes by: Mason James <sushi> 07/07/20 04:42:57
Modified files:
C4 : Labels.pm
Log message:
typo
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Labels.pm?cvsroot=koha&only_with_tag=dev_week&r1=1.3.4.38&r2=1.3.4.39
Patches:
Index: Labels.pm
===================================================================
RCS file: /sources/koha/koha/C4/Labels.pm,v
retrieving revision 1.3.4.38
retrieving revision 1.3.4.39
diff -u -b -r1.3.4.38 -r1.3.4.39
--- Labels.pm 20 Jul 2007 03:59:36 -0000 1.3.4.38
+++ Labels.pm 20 Jul 2007 04:42:57 -0000 1.3.4.39
@@ -612,9 +612,10 @@
# lets get some summary info from each item
my $query1 = "
- select * from biblio,bibliOSUBTitle,biblioitems,items where itemnumber=? and
+ select * from biblio,bibliosubtitle,biblioitems,items where itemnumber=? and
items.biblioitemnumber=biblioitems.biblioitemnumber and
- biblioitems.biblionumber=biblio.biblionumber";
+ biblioitems.biblionumber=biblio.biblionumber and
+ bibliosubtitle.biblionumber = biblio.biblionumber";
my $sth1 = $dbh->prepare($query1);
$sth1->execute( $data->{'itemnumber'} );
@@ -625,7 +626,7 @@
$data1->{'batch_id'} = $batch_id;
$data1->{'summary'} =
"$data1->{'barcode'}, $data1->{'title'}, $data1->{'isbn'}";
-### $data1
+# $data1
push( @resultsloop, $data1 );
$sth1->finish;
@@ -639,7 +640,7 @@
sub GetItemFields {
my @fields = qw (
- barcode title
+ barcode title subtitle
dewey isbn issn author class
itemtype subclass itemcallnumber
More information about the Koha-cvs
mailing list