Revision: 663 http://sourceforge.net/p/opencsw/code/663 Author: dmichelsen Date: 2013-05-22 14:22:49 +0000 (Wed, 22 May 2013) Log Message: ----------- check_prtdiag: Fix output
Modified Paths: -------------- mirror/check_prtdiag Modified: mirror/check_prtdiag =================================================================== --- mirror/check_prtdiag 2013-05-13 10:05:11 UTC (rev 662) +++ mirror/check_prtdiag 2013-05-22 14:22:49 UTC (rev 663) @@ -369,7 +369,7 @@ if( scalar(@failed) > 0 ) { print STDERR "\n" if( $verbose ); - print STDOUT "CRITICAL - Checked $checked component".( $checked le 1 ? "" : "s").", found ".scalar(@failed)." errors : ".join(', ',@failed)."|"; + print STDOUT uc( $PROGNAME ) . " CRITICAL - Checked $checked component".( $checked le 1 ? "" : "s").", found ".scalar(@failed)." errors : ".join(', ',@failed)."|"; print STDOUT join(', ',@passed); print STDOUT "\n"; exit(2); @@ -377,13 +377,13 @@ elsif( $checked == 0 ) { print STDERR "\n" if( $verbose ); - print STDOUT "WARNING - Found nothing to check !\n"; + print STDOUT uc( $PROGNAME ) . " WARNING - Found nothing to check !\n"; exit(1); } else { print STDERR "\n" if( $verbose ); - print STDOUT "OK - Successfully checked $checked component".( $checked le 1 ? "" : "s")."|"; + print STDOUT uc( $PROGNAME ) . " OK - Successfully checked $checked component".( $checked le 1 ? "" : "s")."|"; print STDOUT join(', ',@passed); print STDOUT "\n"; exit(0); This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. _______________________________________________ devel mailing list devel@lists.opencsw.org https://lists.opencsw.org/mailman/listinfo/devel