[Koha-cvs] koha/serials subscription-bib-search.pl

[Antoine Farnault]

CVSROOT:	/sources/koha
Module name:	koha
Changes by:	Antoine Farnault <toins>	06/07/13 08:13:37

Modified files:
	serials        : subscription-bib-search.pl 

Log message:
	replace an array to a hash

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/serials/subscription-bib-search.pl?cvsroot=koha&r1=1.2&r2=1.3

Patches:
Index: subscription-bib-search.pl
===================================================================
RCS file: /sources/koha/koha/serials/subscription-bib-search.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- subscription-bib-search.pl	12 Jul 2006 16:42:08 -0000	1.2
+++ subscription-bib-search.pl	13 Jul 2006 08:13:37 -0000	1.3
@@ -179,11 +179,10 @@
 
     my  %itemtypes = GetItemTypes();
     my @values = values %itemtypes;
-    my @labels = keys %itemtypes;
     my $CGIitemtype=CGI::scrolling_list(
             -name     => 'value',
             -values   => \@values,
-            -labels   => \@labels,
+            -labels   => \%itemtypes,
             -size     => 1,
             -multiple => 0
     );