diff options
| -rwxr-xr-x | perl-install/standalone/drakconnect | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 772be28d8..7273ccffc 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -262,6 +262,7 @@ sub build_tree { foreach (cat_("/etc/sysconfig/network-scripts/ifcfg-ppp0")) { /NAME=(['"]?)(.*)\1/ and $intf->{login} = $2; } + $intf->{login} ||= $l{Username}; my $secret = network::tools::read_secret_backend(); foreach (@$secret) { $intf->{passwd} = $_->{passwd} if $_->{login} eq $intf->{login}; |