work without report, too :-)

git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@672 07558da8-63fa-0310-ba24-9fe276d99e06

diff --git a/run.pl b/run.pl
index 8d9f2cb..6d4692d 100755 (executable)
--- a/run.pl
+++ b/run.pl
@@ -491,7 +491,7 @@ while (my ($database, $db_config) = each %{ $config->{databases} }) {
                        $marc->finish if ($marc);
 
                        # close report
-                       close($report_fh) || $log->logdie("can't close report: $!");
+                       close($report_fh) if ($report_fh)
                }
 
        }