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

(-)a/Koha/Biblio.pm (-1 / +3 lines)
Lines 1949-1954 sub generate_marc_host_field { Link Here
1949
                $sfd{w} = '(' . $host_field->data() . ')' . $sfd{w};
1949
                $sfd{w} = '(' . $host_field->data() . ')' . $sfd{w};
1950
            }
1950
            }
1951
        }
1951
        }
1952
        if ( $host_field = $marc_host->field('999') ) {
1953
            $sfd{0} = $host_field->as_string('c');
1954
        }
1952
        $link_field = MARC::Field->new( 773, '0', ' ', %sfd );
1955
        $link_field = MARC::Field->new( 773, '0', ' ', %sfd );
1953
    } elsif ( $marcflavour eq 'UNIMARC' ) {
1956
    } elsif ( $marcflavour eq 'UNIMARC' ) {
1954
1957
1955
- 

Return to bug 37996