@@ -, +, @@ --- authorities/authorities.pl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) --- a/authorities/authorities.pl +++ a/authorities/authorities.pl @@ -404,7 +404,7 @@ sub build_tabs { $subfield = '@'; } next if ( $tagslib->{$tag}->{$subfield}->{tab} ne $tabloop ); - next if $tagslib->{$tag}->{$subfield}->{hidden}; + next if $tagslib->{$tag}->{$subfield}->{hidden} && $subfield ne '9'; push( @subfields_data, &create_input( @@ -420,7 +420,7 @@ sub build_tabs { my $value = $subfields[$subfieldcount][1]; next if ( length $subfield != 1 ); next if ( $tagslib->{$tag}->{$subfield}->{tab} ne $tabloop ); - next if $tagslib->{$tag}->{$subfield}->{hidden}; + next if $tagslib->{$tag}->{$subfield}->{hidden} && $subfield ne '9'; push( @subfields_data, &create_input( @@ -437,7 +437,7 @@ sub build_tabs { next if ( length $subfield != 1 ); next if ( $tagslib->{$tag}->{$subfield}->{tab} ne $tabloop ); next if ( $tag < 10 ); - next if $tagslib->{$tag}->{$subfield}->{hidden}; + next if $tagslib->{$tag}->{$subfield}->{hidden} && $subfield ne '9'; next if ( defined( $field->subfield($subfield) ) ); push( @subfields_data, @@ -476,7 +476,7 @@ sub build_tabs { my @subfields_data; foreach my $subfield ( sort( keys %{ $tagslib->{$tag} } ) ) { next if ( length $subfield != 1 ); - next if $tagslib->{$tag}->{$subfield}->{hidden}; + next if $tagslib->{$tag}->{$subfield}->{hidden} && $subfield ne '9'; next if ( $tagslib->{$tag}->{$subfield}->{tab} ne $tabloop ); push( @subfields_data, --