[Koha-cvs] koha/C4 Labels.pm [dev_week]

Mason James szrj1m at yahoo.com
Sat Oct 20 16:44:22 CEST 2007


CVSROOT:	/sources/koha
Module name:	koha
Branch:		dev_week
Changes by:	Mason James <sushi>	07/10/20 14:44:22

Modified files:
	C4             : Labels.pm 

Log message:
	now splitting lccns - working.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Labels.pm?cvsroot=koha&only_with_tag=dev_week&r1=1.3.4.48&r2=1.3.4.49

Patches:
Index: Labels.pm
===================================================================
RCS file: /sources/koha/koha/C4/Labels.pm,v
retrieving revision 1.3.4.48
retrieving revision 1.3.4.49
diff -u -b -r1.3.4.48 -r1.3.4.49
--- Labels.pm	20 Oct 2007 06:45:55 -0000	1.3.4.48
+++ Labels.pm	20 Oct 2007 14:44:22 -0000	1.3.4.49
@@ -246,9 +246,18 @@
     my @sorted;
     foreach my $field (@fields) {
         if ( $$conf_data->{"$field"} && $$item->{"$field"} ) {
+            if  ($field eq 'itemcallnumber' &&
+                    $$conf_data->{'callnum_split'} == 1 ){
+
+                my @lccns= split_lccn( $$item->{"$field"});  
+                foreach my $lccn (@lccns){
+                    push (@sorted,  $lccn );
+                }
+            } else {
             push (@sorted,  $$item->{"$field"} );
         }
     }
+    }
     return (@sorted);
 }
 





More information about the Koha-cvs mailing list