[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/C4 Input.pm [rel_3_0]
From: |
Bruno Toumi |
Subject: |
[Koha-cvs] koha/C4 Input.pm [rel_3_0] |
Date: |
Mon, 06 Nov 2006 14:53:28 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_3_0
Changes by: Bruno Toumi <btoumi> 06/11/06 14:53:28
Modified files:
C4 : Input.pm
Log message:
modify scrolling list to have a blanc value in beggining of the list
not in the end
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Input.pm?cvsroot=koha&only_with_tag=rel_3_0&r1=1.20&r2=1.20.2.1
Patches:
Index: Input.pm
===================================================================
RCS file: /sources/koha/koha/C4/Input.pm,v
retrieving revision 1.20
retrieving revision 1.20.2.1
diff -u -b -r1.20 -r1.20.2.1
--- Input.pm 11 Aug 2006 16:05:55 -0000 1.20
+++ Input.pm 6 Nov 2006 14:53:27 -0000 1.20.2.1
@@ -191,11 +191,13 @@
if ($sth->rows>0){
my @values;
my %labels;
- for (my $i =0;$i<=$sth->rows;$i++){
+
+ for (my $i =0;$i<$sth->rows;$i++){
my $results = $sth->fetchrow_hashref;
push @values, $results->{authorised_value};
$labels{$results->{authorised_value}}=$results->{lib};
}
+ unshift(@values,"");
$CGISort= CGI::scrolling_list(
-name => $input_name,
-values => address@hidden,
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/C4 Input.pm [rel_3_0],
Bruno Toumi <=