use Modern::Perl;
-use CGI;
+use CGI qw ( -utf8 );
use C4::Auth;
use C4::Branch;
use C4::Context;
my ($picture, $dberror) = GetPatronImage($borrower->{'borrowernumber'});
$template->param( picture => 1 ) if $picture;
+my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $borrower->{streettype} );
+$template->param(%$borrower);
+
$template->param(
- statisticsview => 1,
- datas => $datas,
- column_names => \@statistic_column_names,
- length_keys => scalar( @statistic_column_names),
+ statisticsview => 1,
+ datas => $datas,
+ roadtype => $roadtype,
+ column_names => \@statistic_column_names,
count_total_issues => $count_total_issues,
count_total_issues_returned => $count_total_issues_returned,
count_total_precedent_state => $count_total_precedent_state,