X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=catalogue%2Fissuehistory.pl;h=ffb8d0284d28e740dd48e8ba9ef08d1e9b8eddbd;hb=5d6c092921919526ade501facb1220f8a108a08f;hp=6e7e1072e788d87cb1aaec0c1036e28a734b8383;hpb=7b2e4ebce2e42d5d8150429768fc50737021bd64;p=koha_fer diff --git a/catalogue/issuehistory.pl b/catalogue/issuehistory.pl index 6e7e1072e7..ffb8d0284d 100755 --- a/catalogue/issuehistory.pl +++ b/catalogue/issuehistory.pl @@ -17,14 +17,15 @@ use strict; -require Exporter; +#use warnings; FIXME - Bug 2505 + use CGI; use C4::Auth; use C4::Output; use C4::Circulation; # GetBiblioIssues use C4::Biblio; # GetBiblio GetBiblioFromItemNumber -use C4::Dates qw/format_date/; +use C4::Search; # enabled_staff_search_views my $query = new CGI; my ( $template, $borrowernumber, $cookie ) = get_template_and_user( @@ -33,7 +34,7 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user( query => $query, type => "intranet", authnotrequired => 0, - flagsrequired => { circulate => 1 }, + flagsrequired => { circulate => "circulate_remaining_permissions" }, } ); @@ -43,6 +44,10 @@ my $params = $query->Vars; my $biblionumber = $params->{'biblionumber'}; my $itemnumber = $params->{'itemnumber'}; +if (C4::Context->preference("HidePatronName")) { + $template->param(HidePatronName => 1); +} + my ($issues,$biblio,$barcode); if ($itemnumber){ $issues=GetItemIssues($itemnumber); @@ -55,21 +60,18 @@ if ($itemnumber){ ); } else { $issues = GetBiblioIssues($biblionumber); - my (undef,@biblio)=GetBiblio($biblionumber); + my $biblio = GetBiblio($biblionumber); my $total = scalar @$issues; $template->param( - %{$biblio[0]}, + %{$biblio}, ); } -foreach (@$issues){ - $_->{date_due} = format_date($_->{date_due}); - $_->{issuedate} = format_date($_->{issuedate}); - $_->{returndate} = format_date($_->{returndate}); -} + $template->param( total => scalar @$issues, issues => $issues, issuehistoryview => 1, + C4::Search::enabled_staff_search_views, ); output_html_with_http_headers $query, $cookie, $template->output;