[Koha-cvs] CVS: koha readingrec.pl,1.12,1.12.2.1

[Owen Leonard]

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

Modified Files:
      Tag: rel_2_2
	readingrec.pl 
Log Message:
- adding 'toggle' variable to allow alternating table row styles
- adding 'classification' to list of returned variables
- using format_date() to format dates according to system preference

Index: readingrec.pl
===================================================================
RCS file: /cvsroot/koha/koha/readingrec.pl,v
retrieving revision 1.12
retrieving revision 1.12.2.1
diff -C2 -r1.12 -r1.12.2.1
*** readingrec.pl	26 Nov 2004 16:50:41 -0000	1.12
--- readingrec.pl	9 Feb 2005 20:57:35 -0000	1.12.2.1
***************
*** 30,33 ****
--- 30,34 ----
  use C4::Search;
  use HTML::Template;
+ use C4::Date;
  my $input=new CGI;
  
***************
*** 62,70 ****
  for (my $i=0;$i<$count;$i++){
   	my %line;
  	$line{biblionumber}=$issues->[$i]->{'biblionumber'};
  	$line{title}=$issues->[$i]->{'title'};
  	$line{author}=$issues->[$i]->{'author'};
! 	$line{date_due}=$issues->[$i]->{'date_due'};
! 	$line{returndate}=$issues->[$i]->{'returndate'};
  	$line{volumeddesc}=$issues->[$i]->{'volumeddesc'};
  	push(@loop_reading,\%line);
--- 63,75 ----
  for (my $i=0;$i<$count;$i++){
   	my %line;
+ 	if($i%2){
+ 		$line{'toggle'} = 1;
+ 	}
  	$line{biblionumber}=$issues->[$i]->{'biblionumber'};
  	$line{title}=$issues->[$i]->{'title'};
  	$line{author}=$issues->[$i]->{'author'};
! 	$line{classification} = $issues->[$i]->{'classification'};
! 	$line{date_due}=format_date($issues->[$i]->{'date_due'});
! 	$line{returndate}=format_date($issues->[$i]->{'returndate'});
  	$line{volumeddesc}=$issues->[$i]->{'volumeddesc'};
  	push(@loop_reading,\%line);