Commit 17ce6a7e authored by Robert Ricci's avatar Robert Ricci

Add \n to the end of a warn() to prevent the line-number output.

parent f557ea3a
......@@ -105,7 +105,7 @@ print "Checking authorization for '$user'\n" if $verbose;
my %outlets = ();
foreach my $node (@machines) {
if (!TBNodeAccessCheck($user,TB_NODEACCESS_POWERCYCLE,$node)) {
warn "You are not authorized to control $node. Skipping...";
warn "You are not authorized to control $node. Skipping...\n";
next;
}
......@@ -183,7 +183,7 @@ foreach my $power_id (keys %outlets) {
if ($type eq "APC") {
my $device = new snmpit_apc($IP,$verbose);
if (!defined $device) {
warn "Unable to contact controller for $nodestr. Skipping..\n";
warn "Unable to contact controller for $nodestr. Skipping...\n";
next;
} else {
print "Calling device->power($op,@outlets)\n"
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment