Bug 9044: (follow-up) restore the toolbar menu items
[koha.git] / catalogue / issuehistory.pl
index 6e7e107..ffb8d02 100755 (executable)
 
 
 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;