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

(-)a/C4/Heading/MARC21.pm (-1 / +2 lines)
Lines 402-407 sub _get_search_heading { Link Here
402
    my $subfields = shift;
402
    my $subfields = shift;
403
403
404
    my $heading   = "";
404
    my $heading   = "";
405
    return $heading unless $subfields;
405
    my @subfields = $field->subfields();
406
    my @subfields = $field->subfields();
406
    my $first     = 1;
407
    my $first     = 1;
407
    for ( my $i = 0 ; $i <= $#subfields ; $i++ ) {
408
    for ( my $i = 0 ; $i <= $#subfields ; $i++ ) {
Lines 439-444 sub _get_display_heading { Link Here
439
    my $subfields = shift;
440
    my $subfields = shift;
440
441
441
    my $heading   = "";
442
    my $heading   = "";
443
    return $heading unless $subfields;
442
    my @subfields = $field->subfields();
444
    my @subfields = $field->subfields();
443
    my $first     = 1;
445
    my $first     = 1;
444
    for ( my $i = 0 ; $i <= $#subfields ; $i++ ) {
446
    for ( my $i = 0 ; $i <= $#subfields ; $i++ ) {
445
- 

Return to bug 36917