From 7c06b90e57e31070d8cc2c026834d196b2f553d3 Mon Sep 17 00:00:00 2001 From: Steve Hancock Date: Mon, 26 Sep 2022 06:36:45 -0700 Subject: [PATCH] cleanups --- dev-bin/perltidy_random_run.pl | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/dev-bin/perltidy_random_run.pl b/dev-bin/perltidy_random_run.pl index 279274dc..d9867047 100755 --- a/dev-bin/perltidy_random_run.pl +++ b/dev-bin/perltidy_random_run.pl @@ -773,21 +773,21 @@ my $cmd1 = "grep 'Thank you' ERR.* >>$gfile"; my $cmd2 = "grep 'Thank you' *.ERR >>$gfile"; system ($cmd1); system ($cmd2); -print STDERR "$count problems seen in $nohup\n"; +print STDERR "**$count problems seen in $nohup\n"; if ($count) { - print STDERR "please see $ofile\n"; + print STDERR "**please see $ofile\n"; } if (-s $gfile) { - print STDERR "please see $gfile\n"; + print STDERR "**please see $gfile\n"; } if (-d 'BLINKERS') { - print STDERR "BLINKERS directory exists - please check\n"; + print STDERR "**BLINKERS directory exists - please check\n"; } my @ERR = glob('*.ERR'); if (@ERR) { my $num=@ERR; - print STDERR "Found $num .ERR files\n"; + print STDERR "**Found $num .ERR files\n"; } # Backup 'nohup.my' @@ -806,7 +806,7 @@ if ( -e $basename ) { print "Moved $basename -> $bname\n"; } else { - die "too many backup versions of $basename - move some\n"; + die "**too many backup versions of $basename - move some\n"; } } print "Run 'get_perltidy.pl' if perltidy has changed\n"; -- 2.39.5