Fixed clusters defined in .clusterss/config file

Bug due to incorrect passing of arguments to the module method

Sf bug 3605675
This commit is contained in:
Duncan Ferguson 2013-02-26 20:11:37 +00:00
parent 72e37269fb
commit 0eb27e2538
2 changed files with 2 additions and 1 deletions

View file

@ -1,5 +1,6 @@
2013-??-?? Duncan Ferguson <duncan_ferguson@user.sf.net> - v4.01_04
- Fixed 'ccon' not calling the correct command (Sf bug 3605002)
- Fixed clusters not being defined correctly within the .clusterssh/config file (Sf bug 3605675)
2013-02-15 Duncan Ferguson <duncan_ferguson@user.sf.net> - v4.01_03
* Correct documentation for references to $HOME/.clusterssh/config

View file

@ -220,7 +220,7 @@ sub parse_config_file {
$self->debug( 3, "Picked up clusters defined in $config_file" );
foreach my $cluster ( sort split / /, $read_config{clusters} ) {
if ( $read_config{$cluster} ) {
$clusters->register_tag( $cluster, $read_config{$cluster} );
$clusters->register_tag( $cluster, split(/ /,$read_config{$cluster}) );
$old_clusters{$cluster} = $read_config{$cluster};
delete( $read_config{$cluster} );
}