summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-05-02 15:29:41 +0000
committerFrancois Pons <fpons@mandriva.com>2000-05-02 15:29:41 +0000
commit494ffe2fc2f6a29aa74994ab53a53e3b074e67f6 (patch)
tree1cbb4eab09138508fa5099036fa11e103b868594 /perl-install/install_steps.pm
parentc367a7b536cbc28a666370a8935718980bdc5ee3 (diff)
downloaddrakx-backup-do-not-use-494ffe2fc2f6a29aa74994ab53a53e3b074e67f6.tar
drakx-backup-do-not-use-494ffe2fc2f6a29aa74994ab53a53e3b074e67f6.tar.gz
drakx-backup-do-not-use-494ffe2fc2f6a29aa74994ab53a53e3b074e67f6.tar.bz2
drakx-backup-do-not-use-494ffe2fc2f6a29aa74994ab53a53e3b074e67f6.tar.xz
drakx-backup-do-not-use-494ffe2fc2f6a29aa74994ab53a53e3b074e67f6.zip
*** empty log message ***
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm6
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 4ed27fb1e..49d6ff677 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -928,6 +928,8 @@ sub upNetwork {
if ($o->{intf} && $o->{netc}{NETWORKING} ne 'false') {
network::up_it($o->{prefix}, $o->{intf});
} elsif (!$pppAvoided && $o->{modem} && !$o->{modem}{isUp}) {
+ eval { modules::load_multi(qw(serial ppp)) };
+ run_program::rooted($o->{prefix}, "/etc/rc.d/init.d/syslog", "start");
run_program::rooted($o->{prefix}, "ifup", "ppp0");
$o->{modem}{isUp} = 1;
} else {
@@ -944,7 +946,9 @@ sub downNetwork {
if (!$pppOnly && $o->{intf} && $o->{netc}{NETWORKING} ne 'false') {
network::down_it($o->{prefix}, $o->{intf});
} elsif ($o->{modem} && $o->{modem}{isUp}) {
- run_program::rooted($o->{prefix}, "ifup", "ppp0");
+ run_program::rooted($o->{prefix}, "ifdown", "ppp0");
+ run_program::rooted($o->{prefix}, "/etc/rc.d/init.d/syslog", "stop");
+ eval { modules::unload($_) foreach qw(ppp serial) };
$o->{modem}{isUp} = 0;
} else {
$::testing or return;