Lines 127-133
sub _filter_field {
Link Here
|
127 |
my $visibility = |
127 |
my $visibility = |
128 |
$marcsubfieldstructure->{$tag}->{$subtag}->{hidden}; |
128 |
$marcsubfieldstructure->{$tag}->{$subtag}->{hidden}; |
129 |
$visibility //= 0; |
129 |
$visibility //= 0; |
130 |
if ( $hide->{$interface}->{$visibility} ) { |
130 |
my $kohafield = $marcsubfieldstructure->{$tag}->{$subtag}->{kohafield} // ''; |
|
|
131 |
if ( $hide->{$interface}->{$visibility} && $kohafield ne 'biblio.biblionumber' ) { |
131 |
|
132 |
|
132 |
# deleting last subfield doesn't delete field, so |
133 |
# deleting last subfield doesn't delete field, so |
133 |
# this detects that case to delete the field. |
134 |
# this detects that case to delete the field. |
Lines 147-153
sub _filter_field {
Link Here
|
147 |
# -8 is flagged, and 9/-9 are not implemented. |
148 |
# -8 is flagged, and 9/-9 are not implemented. |
148 |
my $visibility = $marcsubfieldstructure->{$tag}->{q{@}}->{hidden}; |
149 |
my $visibility = $marcsubfieldstructure->{$tag}->{q{@}}->{hidden}; |
149 |
$visibility //= 0; |
150 |
$visibility //= 0; |
150 |
if ( $hide->{$interface}->{$visibility} ) { |
151 |
my $kohafield = $marcsubfieldstructure->{$tag}->{q{@}}->{kohafield} // ''; |
|
|
152 |
if ( $hide->{$interface}->{$visibility} && $kohafield ne 'biblio.biblionumber' ) { |
151 |
$result->delete_fields($field); |
153 |
$result->delete_fields($field); |
152 |
} |
154 |
} |
153 |
|
155 |
|
154 |
- |
|
|