View | Details | Raw Unified | Return to bug 6829
Collapse All | Expand All

(-)a/opac/opac-MARCdetail.pl (-2 / +1 lines)
Lines 142-148 for ( my $tabloop = 0 ; $tabloop <= 10 ; $tabloop++ ) { Link Here
142
            for my $i ( 0 .. $#subf ) {
142
            for my $i ( 0 .. $#subf ) {
143
                $subf[$i][0] = "@" unless $subf[$i][0];
143
                $subf[$i][0] = "@" unless $subf[$i][0];
144
                my $sf_def = $tagslib->{ $fields[$x_i]->tag() }->{ $subf[$i][0] };
144
                my $sf_def = $tagslib->{ $fields[$x_i]->tag() }->{ $subf[$i][0] };
145
                next if ( ($sf_def->{tab}||'') ne $tabloop );
145
                next if ( ($sf_def->{tab}||0) != $tabloop );
146
                next if ( ($sf_def->{hidden}||0) > 0 );
146
                next if ( ($sf_def->{hidden}||0) > 0 );
147
                my %subfield_data;
147
                my %subfield_data;
148
                $subfield_data{marc_lib} = ($sf_def->{lib} eq $previous) ?  '--' : $sf_def->{lib};
148
                $subfield_data{marc_lib} = ($sf_def->{lib} eq $previous) ?  '--' : $sf_def->{lib};
149
- 

Return to bug 6829