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

(-)a/C4/AuthoritiesMarc.pm (-3 / +2 lines)
Lines 1080-1086 sub BuildSummary { Link Here
1080
            my $type = 'seefrom';
1080
            my $type = 'seefrom';
1081
            $type = ( $marc21controlrefs{ substr $field->subfield('w'), 0, 1 } || '' ) if ( $field->subfield('w') );
1081
            $type = ( $marc21controlrefs{ substr $field->subfield('w'), 0, 1 } || '' ) if ( $field->subfield('w') );
1082
            if ( $type eq 'notapplicable' ) {
1082
            if ( $type eq 'notapplicable' ) {
1083
                $type = substr $field->subfield('w'), 2, 1;
1083
                $type = substr $field->subfield('w'), 2, 1 if length( $field->subfield('w') ) > 2;
1084
                $type = 'earlier' if $type && $type ne 'n';
1084
                $type = 'earlier' if $type && $type ne 'n';
1085
            }
1085
            }
1086
            if ( $type eq 'subfi' ) {
1086
            if ( $type eq 'subfi' ) {
Lines 1103-1109 sub BuildSummary { Link Here
1103
            my $type = 'seealso';
1103
            my $type = 'seealso';
1104
            $type = ( $marc21controlrefs{ substr $field->subfield('w'), 0, 1 } || '' ) if ( $field->subfield('w') );
1104
            $type = ( $marc21controlrefs{ substr $field->subfield('w'), 0, 1 } || '' ) if ( $field->subfield('w') );
1105
            if ( $type eq 'notapplicable' ) {
1105
            if ( $type eq 'notapplicable' ) {
1106
                $type = substr $field->subfield('w'), 2, 1;
1106
                $type = substr $field->subfield('w'), 2, 1 if length( $field->subfield('w') ) > 2;
1107
                $type = 'earlier' if $type && $type ne 'n';
1107
                $type = 'earlier' if $type && $type ne 'n';
1108
            }
1108
            }
1109
            if ( $type eq 'subfi' ) {
1109
            if ( $type eq 'subfi' ) {
1110
- 

Return to bug 35423