[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;