[Koha-cvs] CVS: koha/admin marc_subfields_structure.pl,1.32.2.1,1.32.2.2

[Owen Leonard]

Update of /cvsroot/koha/koha/admin
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24947/admin

Modified Files:
      Tag: rel_2_2
        marc_subfields_structure.pl 
Log Message:
Changing table row color toggle so that color values can be specified in the 
template instead of the script (requires update to template)

Index: marc_subfields_structure.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/marc_subfields_structure.pl,v
retrieving revision 1.32.2.1
retrieving revision 1.32.2.2
diff -C2 -r1.32.2.1 -r1.32.2.2
*** marc_subfields_structure.pl 19 Jan 2005 17:17:10 -0000      1.32.2.1
--- marc_subfields_structure.pl 20 Jan 2005 18:42:29 -0000      1.32.2.2
***************
*** 154,165 ****
        $sth->execute($tagfield,$frameworkcode);
        my @loop_data = ();
!       my $toggle="white";
        my $i=0;
        while ($data =$sth->fetchrow_hashref) {
                my %row_data;  # get a fresh hash for the row data
!               if ($toggle eq 'white'){
!                       $toggle="#ffffcc";
                } else {
!                       $toggle="white";
                }
                $row_data{tab} = CGI::scrolling_list(-name=>'tab',
--- 154,165 ----
        $sth->execute($tagfield,$frameworkcode);
        my @loop_data = ();
!       my $toggle=1;
        my $i=0;
        while ($data =$sth->fetchrow_hashref) {
                my %row_data;  # get a fresh hash for the row data
!               if ($toggle eq 1){
!                       $toggle=0;
                } else {
!                       $toggle=1;
                }
                $row_data{tab} = CGI::scrolling_list(-name=>'tab',
***************
*** 358,368 ****
        my $env;
        my ($count,$results)=StringSearch($env,$tagfield,$frameworkcode);
!       my $toggle="white";
        my @loop_data = ();
        for (my $i=$offset; $i < 
($offset+$pagesize<$count?$offset+$pagesize:$count); $i++){
!               if ($toggle eq 'white'){
!                       $toggle="#ffffcc";
                } else {
!                       $toggle="white";
                }
                my %row_data;  # get a fresh hash for the row data
--- 358,368 ----
        my $env;
        my ($count,$results)=StringSearch($env,$tagfield,$frameworkcode);
!       my $toggle=1;
        my @loop_data = ();
        for (my $i=$offset; $i < 
($offset+$pagesize<$count?$offset+$pagesize:$count); $i++){
!               if ($toggle eq 1){
!                       $toggle=0;
                } else {
!                       $toggle=1;
                }
                my %row_data;  # get a fresh hash for the row data
***************
*** 382,386 ****
                $row_data{link} = $results->[$i]{'link'};
                $row_data{delete} = 
"$script_name?op=delete_confirm&amp;tagfield=$tagfield&amp;tagsubfield=".$results->[$i]{'tagsubfield'}."&frameworkcode=$frameworkcode";
!               $row_data{bgcolor} = $toggle;
                if ($row_data{tab} eq -1) {
                        $row_data{subfield_ignored} = 1;
--- 382,386 ----
                $row_data{link} = $results->[$i]{'link'};
                $row_data{delete} = 
"$script_name?op=delete_confirm&amp;tagfield=$tagfield&amp;tagsubfield=".$results->[$i]{'tagsubfield'}."&frameworkcode=$frameworkcode";
!               $row_data{toggle} = $toggle;
                if ($row_data{tab} eq -1) {
                        $row_data{subfield_ignored} = 1;