summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-03-02 14:48:40 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-03-02 14:48:40 +0000
commite3f3bc8b0988231058fe0c22e140f542106a6e30 (patch)
tree07153aac338fcd8e0687f66b29468584de885ba3 /perl-install
parent61b21bdefa124fa2bb445dcb34e9d0d3e0d4f2fc (diff)
downloaddrakx-e3f3bc8b0988231058fe0c22e140f542106a6e30.tar
drakx-e3f3bc8b0988231058fe0c22e140f542106a6e30.tar.gz
drakx-e3f3bc8b0988231058fe0c22e140f542106a6e30.tar.bz2
drakx-e3f3bc8b0988231058fe0c22e140f542106a6e30.tar.xz
drakx-e3f3bc8b0988231058fe0c22e140f542106a6e30.zip
fix modem symlink (#7967)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/modem.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/network/modem.pm b/perl-install/network/modem.pm
index e790cf83c..4d90f3906 100644
--- a/perl-install/network/modem.pm
+++ b/perl-install/network/modem.pm
@@ -51,7 +51,7 @@ sub ppp_configure {
$in->do_pkgs->install('ppp') if !$::testing;
$in->do_pkgs->install('kdenetwork-kppp') if !$::testing && $in->do_pkgs->is_installed('kdebase');
- any::devfssymlinkf($modem, 'modem') if $modem->{device} ne "/dev/modem";
+ any::devfssymlinkf($modem->{device}, 'modem') if $modem->{device} ne "/dev/modem";
my %toreplace = map { $_ => $modem->{$_} } qw(Authentication AutoName connection dns1 dns2 domain IPAddr login passwd phone SubnetMask);
$toreplace{phone} =~ s/[a-zA-Z]//g;