From a0080586e4582ab26ea599965eb71bd3ae5d8908 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Fr=C3=A9d=C3=A9ric=20Demians?= Date: Tue, 27 Dec 2011 11:01:48 +0100 Subject: [PATCH] Bug 6829 Follow up patch To reproduce the bug: - Open OPAC MARC View for a specific biblio record - Fields which are affected to tab 0 are all hidden Signed-off-by: Katrin Fischer Patch fixes bug for 0xx fields in OPAC MARC view. Note: the problem only exists for 0xx fields with real subfields, control fields display correctly, fields like 040 only display after patch was applied. (cherry picked from commit 263e5724eb1c9f1e787474ec92403179496c03b4) Signed-off-by: Chris Nighswonger --- opac/opac-MARCdetail.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/opac/opac-MARCdetail.pl b/opac/opac-MARCdetail.pl index ffa0a6d7df..272ac0cc4f 100755 --- a/opac/opac-MARCdetail.pl +++ b/opac/opac-MARCdetail.pl @@ -142,7 +142,7 @@ for ( my $tabloop = 0 ; $tabloop <= 10 ; $tabloop++ ) { for my $i ( 0 .. $#subf ) { $subf[$i][0] = "@" unless $subf[$i][0]; my $sf_def = $tagslib->{ $fields[$x_i]->tag() }->{ $subf[$i][0] }; - next if ( ($sf_def->{tab}||'') ne $tabloop ); + next if ( ($sf_def->{tab}||0) != $tabloop ); next if ( ($sf_def->{hidden}||0) > 0 ); my %subfield_data; $subfield_data{marc_lib} = ($sf_def->{lib} eq $previous) ? '--' : $sf_def->{lib}; -- 2.39.5