Quoting href attribute to make XHTML compliant
[koha.git] / readingrec.pl
index 2c72f2e..8a49cc4 100755 (executable)
@@ -25,6 +25,7 @@
 use strict;
 use C4::Auth;
 use C4::Output;
+use C4::Interface::CGI::Output;
 use CGI;
 use C4::Search;
 use HTML::Template;
@@ -62,17 +63,22 @@ for (my $i=0;$i<$count;$i++){
        my %line;
        $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);
 }
+
 $template->param(title => $data->{'title'},
                                                initials => $data->{'initials'},
                                                surname => $data->{'surname'},
                                                bornum => $bornum,
                                                limit => $limit,
+                                               firstname => $data->{'firstname'},
+                                               cardnumber => $data->{'cardnumber'},
+                                               showfulllink => ($count > 50),                                  
                                                loop_reading => \@loop_reading);
-print $input->header(-cookie => $cookie),$template->output;
+output_html_with_http_headers $input, $cookie, $template->output;