]> git.donarmstrong.com Git - perltidy.git/commitdiff
cleanups
authorSteve Hancock <perltidy@users.sourceforge.net>
Mon, 26 Sep 2022 13:36:45 +0000 (06:36 -0700)
committerSteve Hancock <perltidy@users.sourceforge.net>
Mon, 26 Sep 2022 13:36:45 +0000 (06:36 -0700)
dev-bin/perltidy_random_run.pl

index 279274dc88dfc34c342b2a5362225ebd0e9ea15c..d9867047d529f969d74b08c5ac5a77e96b0af462 100755 (executable)
@@ -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";