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