[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha MARCdetail.pl [rel_2_2]
From: |
paul poulain |
Subject: |
[Koha-cvs] koha MARCdetail.pl [rel_2_2] |
Date: |
Thu, 05 Jan 2006 15:10:16 +0000 |
CVSROOT: /cvsroot/koha
Module name: koha
Branch: rel_2_2
Changes by: paul poulain <address@hidden> 06/01/05 15:10:16
Modified files:
. : MARCdetail.pl
Log message:
bugfix with $0 subfield
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/MARCdetail.pl.diff?only_with_tag=rel_2_2&tr1=1.25.2.15&tr2=1.25.2.16&r1=text&r2=text
Patches:
Index: koha/MARCdetail.pl
diff -u koha/MARCdetail.pl:1.25.2.15 koha/MARCdetail.pl:1.25.2.16
--- koha/MARCdetail.pl:1.25.2.15 Tue Dec 13 17:34:22 2005
+++ koha/MARCdetail.pl Thu Jan 5 15:10:16 2006
@@ -148,7 +148,7 @@
my @subf=$fields[$x_i]->subfields;
# loop through each subfield
for my $i (0..$#subf) {
- $subf[$i][0] = "@" unless $subf[$i][0];
+ $subf[$i][0] = "@" unless $subf[$i][0] or
$subf[$i][0] eq '0';
next if
($tagslib->{$fields[$x_i]->tag()}->{$subf[$i][0]}->{tab} ne $tabloop);
next if
($tagslib->{$fields[$x_i]->tag()}->{$subf[$i][0]}->{hidden});
my %subfield_data;
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha MARCdetail.pl [rel_2_2],
paul poulain <=