bug 6858 follow-up indenting with spaces
authorPaul Poulain <paul.poulain@biblibre.com>
Wed, 28 Mar 2012 16:10:40 +0000 (18:10 +0200)
committerPaul Poulain <paul.poulain@biblibre.com>
Wed, 28 Mar 2012 16:10:40 +0000 (18:10 +0200)
misc/cronjobs/staticfines.pl

index 5d6e25c..6e384a6 100755 (executable)
@@ -152,12 +152,12 @@ for ( my $i = 0 ; $i < scalar(@$data) ; $i++ ) {
     my $datedue;
     my $datedue_days;
     eval {
-       $datedue = C4::Dates->new( $data->[$i]->{'date_due'}, 'iso' );
-       $datedue_days = Date_to_Days( split( /-/, $datedue->output('iso') ) );
+        $datedue = C4::Dates->new( $data->[$i]->{'date_due'}, 'iso' );
+        $datedue_days = Date_to_Days( split( /-/, $datedue->output('iso') ) );
     };
     if ($@) {
-       warn "Error on date for borrower " . $data->[$i]->{'borrowernumber'} .  ": $@date_due: " . $data->[$i]->{'date_due'} . "\ndatedue_days: " . $datedue_days . "\nSkipping";
-       next;
+        warn "Error on date for borrower " . $data->[$i]->{'borrowernumber'} .  ": $@date_due: " . $data->[$i]->{'date_due'} . "\ndatedue_days: " . $datedue_days . "\nSkipping";
+        next;
     }
     my $due_str = $datedue->output();
     unless ( defined $data->[$i]->{'borrowernumber'} ) {