Still a work in progress, pendingreserves.pl is quite broken

[koha_fer] / circ / overdue.pl

diff --git a/circ/overdue.pl b/circ/overdue.pl
index f5120e2..23d5c75 100755 (executable)
--- a/circ/overdue.pl
+++ b/circ/overdue.pl
@@ -1,6 +1,5 @@
 #!/usr/bin/perl
 
-# $Id$
 
 # Copyright 2000-2002 Katipo Communications
 #
@@ -25,21 +24,19 @@ use C4::Output;
 use CGI;
 use C4::Auth;
 use C4::Branch;
-use C4::Date;
+use C4::Dates qw/format_date/;
 
 my $input = new CGI;
-my $type  = $input->param('type');
-
-my $theme = $input->param('theme');    # only used if allowthemeoverride is set
-my $order=$input->param('order');
-my $bornamefilter=$input->param('borname');
-my $borcatfilter=$input->param('borcat');
-my $itemtypefilter=$input->param('itemtype');
-my $borflagsfilter=$input->param('borflags') || " ";
-my $branchfilter=$input->param('branch');
-my $showall=$input->param('showall');
-my $theme = $input->param('theme'); # only used if allowthemeoverride is set
-
+my $type    = $input->param('type');
+my $theme   = $input->param('theme');    # only used if allowthemeoverride is set
+my $order   = $input->param('order');
+my $showall = $input->param('showall');
+
+my  $bornamefilter = $input->param('borname');
+my   $borcatfilter = $input->param('borcat');
+my $itemtypefilter = $input->param('itemtype');
+my $borflagsfilter = $input->param('borflags') || " ";
+my   $branchfilter = $input->param('branch');
 
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
     {