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

(-)a/C4/Labels/Label.pm (-2 / +1 lines)
Lines 383-389 sub draw_label_text { Link Here
383
        my @label_lines;
383
        my @label_lines;
384
        # Fields which hold call number data  FIXME: ( 060? 090? 092? 099? )
384
        # Fields which hold call number data  FIXME: ( 060? 090? 092? 099? )
385
        my @callnumber_list = qw(itemcallnumber 050a 050b 082a 952o 995k);
385
        my @callnumber_list = qw(itemcallnumber 050a 050b 082a 952o 995k);
386
        if ((grep {$field->{'code'} =~ m/$_/} @callnumber_list) and ($self->{'printing_type'} eq 'BIB') and ($self->{'callnum_split'})) { # If the field contains the call number, we do some sp
386
        if ((grep {$field->{'code'} =~ m/$_/} @callnumber_list) and ($self->{'printing_type'} ne 'BAR') and ($self->{'callnum_split'})) { # If the field contains the call number, we do some sp
387
            if ($split_routine eq 'LCC' || $split_routine eq 'nlm') { # NLM and LCC should be split the same way
387
            if ($split_routine eq 'LCC' || $split_routine eq 'nlm') { # NLM and LCC should be split the same way
388
                @label_lines = C4::ClassSplitRoutine::LCC::split_callnumber($field_data);
388
                @label_lines = C4::ClassSplitRoutine::LCC::split_callnumber($field_data);
389
                @label_lines = C4::ClassSplitRoutine::Generic::split_callnumber($field_data) unless @label_lines; # If it was not a true lccn, try it as a custom call number
389
                @label_lines = C4::ClassSplitRoutine::Generic::split_callnumber($field_data) unless @label_lines; # If it was not a true lccn, try it as a custom call number
390
- 

Return to bug 23514