[Koha-devel] CVS: koha/C4 Output.pm,1.6.2.1,1.6.2.2

[Pat Eyler]

Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv11670

Modified Files:
      Tag: rel-1-2
        Output.pm 
Log Message:
fixed an unitialized variable error in &mktablerow

Index: Output.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Output.pm,v
retrieving revision 1.6.2.1
retrieving revision 1.6.2.2
diff -C2 -r1.6.2.1 -r1.6.2.2
*** Output.pm   25 Apr 2002 14:50:16 -0000      1.6.2.1
--- Output.pm   25 Apr 2002 15:51:33 -0000      1.6.2.2
***************
*** 147,162 ****
    my $string="<tr valign=top bgcolor=$colour>";
    while ($i <$cols){
!     if ($data[$cols] ne ''){
!     #check for backgroundimage
!       $string.="<td background=\"$data[$cols]\">";
!     } else {
!       $string.="<td>";
!     }
!     if ($data[$i] eq "") {
!       $string.=" &nbsp; </td>";
!     } else {
!       $string.="$data[$i]</td>";
!     } 
!     $i++;
    }
    $string=$string."</tr>\n";
--- 147,161 ----
    my $string="<tr valign=top bgcolor=$colour>";
    while ($i <$cols){
!       if (defined $data[$cols]) { # if there is a background image
!         $string.="<td background=\"$data[$cols]\">";
!       } else { # if there's no background image
!         $string.="<td>";
!       }
!       if ($data[$i] eq "") {
!         $string.=" &nbsp; </td>";
!       } else {
!         $string.="$data[$i]</td>";
!       } 
!       $i++;
    }
    $string=$string."</tr>\n";