summaryrefslogtreecommitdiffstats
path: root/perl-install/network/modem.pm
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2004-09-23 02:44:54 +0000
committerOlivier Blin <oblin@mandriva.org>2004-09-23 02:44:54 +0000
commit780a0eb65b4634b0c9ccdccf97e807feb6bfbb0d (patch)
tree634b5d6d04678eb958f999dcf53a5fa3329894fa /perl-install/network/modem.pm
parent3eb3dbab84018bc762a152c1ccf61ffbd6cc9dc1 (diff)
downloaddrakx-780a0eb65b4634b0c9ccdccf97e807feb6bfbb0d.tar
drakx-780a0eb65b4634b0c9ccdccf97e807feb6bfbb0d.tar.gz
drakx-780a0eb65b4634b0c9ccdccf97e807feb6bfbb0d.tar.bz2
drakx-780a0eb65b4634b0c9ccdccf97e807feb6bfbb0d.tar.xz
drakx-780a0eb65b4634b0c9ccdccf97e807feb6bfbb0d.zip
(ppp_configure) add a specific udev script in addition to the udev
rules file to create /dev/modem (ttySL0 is a symlink, udev won't be called when it's created)
Diffstat (limited to 'perl-install/network/modem.pm')
-rw-r--r--perl-install/network/modem.pm11
1 files changed, 10 insertions, 1 deletions
diff --git a/perl-install/network/modem.pm b/perl-install/network/modem.pm
index 08a4c3d6a..0af9d9ffa 100644
--- a/perl-install/network/modem.pm
+++ b/perl-install/network/modem.pm
@@ -67,7 +67,16 @@ 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";
+ if ($modem->{device} ne "/dev/modem") {
+ my $dev = $modem->{device};
+ $dev =~ s!^/dev/!!;
+ any::devfssymlinkf({ device => $dev }, 'modem');
+ #- add a specific udev script in addition to the udev rules file
+ #- (ttySL0 is a symlink, udev won't be called when it's created)
+ my $udev_conf = "$::prefix/etc/udev/conf.d/modem.conf";
+ output_p($udev_conf, "ln -sf $dev /dev/modem\n");
+ chmod 0755, $udev_conf;
+ }
my %toreplace = map { $_ => $modem->{$_} } qw(Authentication AutoName connection dns1 dns2 domain IPAddr login passwd phone SubnetMask);
$toreplace{phone} =~ s/[a-zA-Z]//g;