Run through perltidy

This commit is contained in:
Duncan Ferguson 2009-11-24 09:22:31 +00:00
parent b39e649ab3
commit ac1b4697cf

View file

@ -433,6 +433,7 @@ sub check_ssh_hostnames {
if ( -r $ssh_config && open( SSHCFG, "<", $ssh_config ) ) {
while (<SSHCFG>) {
next unless (m/^\s*host\s+([\w\.-]+)/i);
# account for multiple declarations of hosts
$ssh_hostnames{$_} = 1 foreach ( split( /\s+/, $1 ) );
}