[Koha-cvs] koha/reports catalogue_out.pl cat_issues_top.pl

Antoine Farnault antoine at koha-fr.org
Wed Jul 12 19:22:37 CEST 2006


CVSROOT:	/sources/koha
Module name:	koha
Changes by:	Antoine Farnault <toins>	06/07/12 17:22:37

Modified files:
	reports        : catalogue_out.pl cat_issues_top.pl 

Log message:
	getitemtypes renamed to GetItemTypes

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/reports/catalogue_out.pl?cvsroot=koha&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/koha/reports/cat_issues_top.pl?cvsroot=koha&r1=1.9&r2=1.10

Patches:
Index: catalogue_out.pl
===================================================================
RCS file: /sources/koha/koha/reports/catalogue_out.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- catalogue_out.pl	4 Jul 2006 14:36:52 -0000	1.4
+++ catalogue_out.pl	12 Jul 2006 17:22:37 -0000	1.5
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: catalogue_out.pl,v 1.4 2006/07/04 14:36:52 toins Exp $
+# $Id: catalogue_out.pl,v 1.5 2006/07/12 17:22:37 toins Exp $
 
 # Copyright 2000-2002 Katipo Communications
 #
@@ -137,7 +137,7 @@
 				-size     => 1,
 				-multiple => 0 );
 	#doctype
-	my $itemtypes = getitemtypes;
+	my $itemtypes = GetItemTypes;
 	my @itemtypeloop;
 	foreach my $thisitemtype (keys %$itemtypes) {
 # 			my $selected = 1 if $thisbranch eq $branch;

Index: cat_issues_top.pl
===================================================================
RCS file: /sources/koha/koha/reports/cat_issues_top.pl,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -b -r1.9 -r1.10
--- cat_issues_top.pl	4 Jul 2006 14:36:52 -0000	1.9
+++ cat_issues_top.pl	12 Jul 2006 17:22:37 -0000	1.10
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: cat_issues_top.pl,v 1.9 2006/07/04 14:36:52 toins Exp $
+# $Id: cat_issues_top.pl,v 1.10 2006/07/12 17:22:37 toins Exp $
 
 # Copyright 2000-2002 Katipo Communications
 #
@@ -151,7 +151,7 @@
 	}
 
 	#doctype
-	my $itemtypes = getitemtypes;
+	my $itemtypes = GetItemTypes;
 	my @itemtypeloop;
 	foreach my $thisitemtype (keys %$itemtypes) {
 # 			my $selected = 1 if $thisbranch eq $branch;





More information about the Koha-cvs mailing list