bugfix : html mistake
[koha.git] / opac / opac-readingrecord.pl
index b202ee5..e8ba45c 100755 (executable)
@@ -23,7 +23,7 @@ use CGI;
 use C4::Auth;
 use C4::Koha;
 use C4::Circulation;
-use C4::Date;
+use C4::Dates qw/format_date/;
 use C4::Members;
 
 use C4::Output;
@@ -45,6 +45,9 @@ my ( $borr, $flags ) = GetMemberDetails( $borrowernumber );
 
 $template->param($borr);
 
+my $imgdir = getitemtypeimagesrc();
+my $itemtypes = GetItemTypes();
+
 # get the record
 my $order  = $query->param('order');
 my $order2 = $order;
@@ -68,6 +71,7 @@ if ( $limit eq 'full' ) {
 else {
     $limit = 50;
 }
+
 my ( $count, $issues ) = GetAllIssues( $borrowernumber, $order2, $limit );
 
 # add the row parity
@@ -88,11 +92,14 @@ for ( my $i = 0 ; $i < $count ; $i++ ) {
     $line{biblionumber}   = $issues->[$i]->{'biblionumber'};
     $line{title}          = $issues->[$i]->{'title'};
     $line{author}         = $issues->[$i]->{'author'};
-    $line{classification} = $issues->[$i]->{'classification'};
+    $line{isbn}         = $issues->[$i]->{'isbn'};
+    $line{itemcallnumber} = $issues->[$i]->{'itemcallnumber'};
     $line{date_due}       = format_date( $issues->[$i]->{'date_due'} );
     $line{returndate}     = format_date( $issues->[$i]->{'returndate'} );
     $line{volumeddesc}    = $issues->[$i]->{'volumeddesc'};
     $line{counter}        = $i + 1;
+    $line{'description'} = $itemtypes->{ $issues->[$i]->{'itemtype'} }->{'description'};
+    $line{imageurl}       = $imgdir."/".$itemtypes->{ $issues->[$i]->{'itemtype'}  }->{'imageurl'}; 
     push( @loop_reading, \%line );
 }
 
@@ -100,7 +107,8 @@ $template->param(
     count          => $count,
     READING_RECORD => \@loop_reading,
     limit          => $limit,
-    showfulllink   => ( $count > 50 ),
+    showfulllink   => 1,
+       readingrecview => 1
 );
 
 output_html_with_http_headers $query, $cookie, $template->output;