amassivus/clusterssh
1
0
Fork 0
mirror of https://github.com/duncs/clusterssh.git synced 2025-04-22 09:22:24 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Merge pull request #21 from cqexbesd/logmsg

Browse source 
logmsg -> $self->debug
This commit is contained in:
Duncan Ferguson 2015-01-24 18:34:04 +00:00
commit ef13feb390
1 changed files with 2 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lib/App/ClusterSSH.pm
View file

@ -1164,7 +1164,7 @@ sub toggle_active_state() {
sub set_all_active() {
my ($self) = @_;
logmsg( 2, "Setting all hosts to be active" );
$self->debug( 2, "Setting all hosts to be active" );
foreach my $svr ( keys(%servers) ) {
$servers{$svr}{active} = 1;
@ -1174,7 +1174,7 @@ sub set_all_active() {
sub set_half_inactive() {
my ($self) = @_;
logmsg( 2, "Setting approx half of all hosts to inactive" );
$self->debug( 2, "Setting approx half of all hosts to inactive" );
my (@keys) = keys(%servers);
$#keys /= 2;
@ -2124,8 +2124,6 @@ the code until this time.
=item load_keyboard_map
=item logmsg
=item new
=item open_client_windows