From 64d701e1050e3baa0a90ae93313881b83f4c58e0 Mon Sep 17 00:00:00 2001 From: Fridolyn SOMERS Date: Mon, 26 Nov 2012 15:15:18 +0100 Subject: [PATCH] Bug 9147: OPAC hidden fields are not hidden in ISBD view --- C4/Biblio.pm | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/C4/Biblio.pm b/C4/Biblio.pm index 832da69..b028192 100644 --- a/C4/Biblio.pm +++ b/C4/Biblio.pm @@ -955,6 +955,10 @@ sub GetISBDView { # warn "ERROR IN ISBD DEFINITION at : $isbdfield" unless $fieldvalue; # warn "FV : $fieldvalue"; if ( $subfvalue ne "" ) { + # OPAC hidden subfield + next + if ( ( $template eq 'opac' ) + && ( $tagslib->{$fieldvalue}->{$subfvalue}->{'hidden'} || 0 ) > 0 ); foreach my $field (@fieldslist) { foreach my $subfield ( $field->subfield($subfvalue) ) { my $calculated = $analysestring; @@ -990,6 +994,10 @@ sub GetISBDView { for my $i ( 0 .. $#subf ) { my $valuecode = $subf[$i][1]; my $subfieldcode = $subf[$i][0]; + # OPAC hidden subfield + next + if ( ( $template eq 'opac' ) + && ( $tagslib->{$fieldvalue}->{$subfieldcode}->{'hidden'} || 0 ) > 0 ); my $subfieldvalue = GetAuthorisedValueDesc( $tag, $subf[$i][0], $subf[$i][1], '', $tagslib ); my $tagsubf = $tag . $subfieldcode; -- 1.7.9.5