1
0
forked from HPR/hpr_generator

Autoflush STDOUT for non verbose progress indication

This commit is contained in:
2022-07-31 18:50:34 -04:00
parent 2a61d89907
commit cf554571c8

View File

@@ -177,10 +177,11 @@ sub generate_page {
sub verbose { sub verbose {
my ($verbose, $message) = @_; my ($verbose, $message) = @_;
if ($verbose) { if ($verbose) {
print "$message\n"; print STDOUT "$message\n";
} }
else { else {
print "."; STDOUT->autoflush(1);
print STDOUT ".";
}; };
} }