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

[Owen Leonard]

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

Modified Files:
        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.13
diff -C2 -r1.12 -r1.13
*** readingrec.pl       26 Nov 2004 16:50:41 -0000      1.12
--- readingrec.pl       9 Feb 2005 20:59:18 -0000       1.13
***************
*** 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);