Autoflush STDOUT for non verbose progress indication

This commit is contained in:
Roan Horning 2022-07-31 18:50:34 -04:00
parent 2a61d89907
commit cf554571c8
Signed by untrusted user: rho_n
GPG Key ID: 234AEF20B72D5769

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 ".";
}; };
} }