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

(-)a/C4/AuthoritiesMarc.pm (-3 / +2 lines)
Lines 1084-1090 sub BuildSummary { Link Here
1084
            my $type = 'seefrom';
1084
            my $type = 'seefrom';
1085
            $type = ( $marc21controlrefs{ substr $field->subfield('w'), 0, 1 } || '' ) if ( $field->subfield('w') );
1085
            $type = ( $marc21controlrefs{ substr $field->subfield('w'), 0, 1 } || '' ) if ( $field->subfield('w') );
1086
            if ( $type eq 'notapplicable' ) {
1086
            if ( $type eq 'notapplicable' ) {
1087
                $type = substr $field->subfield('w'), 2, 1;
1087
                $type = substr $field->subfield('w'), 2, 1 if length( $field->subfield('w') ) > 2;
1088
                $type = 'earlier' if $type && $type ne 'n';
1088
                $type = 'earlier' if $type && $type ne 'n';
1089
            }
1089
            }
1090
            if ( $type eq 'subfi' ) {
1090
            if ( $type eq 'subfi' ) {
Lines 1107-1113 sub BuildSummary { Link Here
1107
            my $type = 'seealso';
1107
            my $type = 'seealso';
1108
            $type = ( $marc21controlrefs{ substr $field->subfield('w'), 0, 1 } || '' ) if ( $field->subfield('w') );
1108
            $type = ( $marc21controlrefs{ substr $field->subfield('w'), 0, 1 } || '' ) if ( $field->subfield('w') );
1109
            if ( $type eq 'notapplicable' ) {
1109
            if ( $type eq 'notapplicable' ) {
1110
                $type = substr $field->subfield('w'), 2, 1;
1110
                $type = substr $field->subfield('w'), 2, 1 if length( $field->subfield('w') ) > 2;
1111
                $type = 'earlier' if $type && $type ne 'n';
1111
                $type = 'earlier' if $type && $type ne 'n';
1112
            }
1112
            }
1113
            if ( $type eq 'subfi' ) {
1113
            if ( $type eq 'subfi' ) {
1114
- 

Return to bug 35423