Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Modified write in fines.pl to silence message unless verbose is set.

Browse source 
Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
This commit is contained in:
James Winter 2009-08-12 11:24:30 -04:00 committed by Galen Charlton
parent 11a1c687fd
commit 13bef6756e
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
misc/cronjobs/fines.pl
View file

@ -112,7 +112,7 @@ if (!-d $fldir) {
$filename = $dbname; $filename = $dbname;
$filename =~ s/\W//; $filename =~ s/\W//;
$filename = $fldir . '/'. $filename . '_' . $today_iso . ".log"; $filename = $fldir . '/'. $filename . '_' . $today_iso . ".log";
print "writing to $filename\n"; print "writing to $filename\n" if $verbose;
open (FILE, ">$filename") or die "Cannot write file $filename: $!"; open (FILE, ">$filename") or die "Cannot write file $filename: $!";
print FILE join $delim, (@borrower_fields, @item_fields, @other_fields); print FILE join $delim, (@borrower_fields, @item_fields, @other_fields);
print FILE "\n"; print FILE "\n";