Modified write in fines.pl to silence message unless verbose is set.
Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
This commit is contained in:
parent
11a1c687fd
commit
13bef6756e
1 changed files with 1 additions and 1 deletions
|
@ -112,7 +112,7 @@ if (!-d $fldir) {
|
|||
$filename = $dbname;
|
||||
$filename =~ s/\W//;
|
||||
$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: $!";
|
||||
print FILE join $delim, (@borrower_fields, @item_fields, @other_fields);
|
||||
print FILE "\n";
|
||||
|
|
Loading…
Reference in a new issue