From 7b01c7cba703a85017485bd61fce074896e91888 Mon Sep 17 00:00:00 2001 From: Jared Camins-Esakov Date: Sun, 3 Apr 2011 11:09:29 -0400 Subject: [PATCH] Bug 3543: split NLM call numbers in label creator Content-Type: text/plain; charset="UTF-8" Split NLM call numbers using the same rules as those used for Library of Congress call numbers. --- C4/Labels/Label.pm | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/C4/Labels/Label.pm b/C4/Labels/Label.pm index 0ea2de9..0c98d6f 100644 --- a/C4/Labels/Label.pm +++ b/C4/Labels/Label.pm @@ -408,7 +408,7 @@ sub draw_label_text { # Fields which hold call number data FIXME: ( 060? 090? 092? 099? ) my @callnumber_list = qw(itemcallnumber 050a 050b 082a 952o 995k); 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 - if ($cn_source eq 'lcc') { + if ($cn_source eq 'lcc' || $cn_source eq 'nlm') { # NLM and LCC should be split the same way @label_lines = _split_lccn($field_data); @label_lines = _split_ccn($field_data) if !@label_lines; # If it was not a true lccn, try it as a custom call number push (@label_lines, $field_data) if !@label_lines; # If it was not that, send it on unsplit -- 1.7.2.3