diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-28 13:26:25 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-28 13:26:25 +0000 |
| commit | ec747dc1097a5f80d220311dc89e9d6ec32cab31 (patch) | |
| tree | 88da1b167952608d6ae5d7579927a85baf4767ce /perl-install/network/tools.pm | |
| parent | 6bd6d9750078047ed4df33564ace48d1cb3c32a9 (diff) | |
| download | drakx-backup-do-not-use-ec747dc1097a5f80d220311dc89e9d6ec32cab31.tar drakx-backup-do-not-use-ec747dc1097a5f80d220311dc89e9d6ec32cab31.tar.gz drakx-backup-do-not-use-ec747dc1097a5f80d220311dc89e9d6ec32cab31.tar.bz2 drakx-backup-do-not-use-ec747dc1097a5f80d220311dc89e9d6ec32cab31.tar.xz drakx-backup-do-not-use-ec747dc1097a5f80d220311dc89e9d6ec32cab31.zip | |
perl_checker adaptations
Diffstat (limited to 'perl-install/network/tools.pm')
| -rw-r--r-- | perl-install/network/tools.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm index 78075fd68..55c8b8a89 100644 --- a/perl-install/network/tools.pm +++ b/perl-install/network/tools.pm @@ -18,7 +18,7 @@ sub write_cnx_script { $netc->{internet_cnx}{$type}{type} = $type2; } else { foreach ($connect_file, $disconnect_file) { - output ("$prefix$_", + output("$prefix$_", '#!/bin/bash ' . if_(!$netc->{at_boot}, 'if [ "x$1" == "x--boot_time" ]; then exit; fi ') . $netc->{internet_cnx}{$netc->{internet_cnx_choice}}{$_}); @@ -223,7 +223,7 @@ sub disconnected {} sub write_initscript { - output ("$prefix/etc/rc.d/init.d/internet", sprintf(<<'EOF', $connect_file, $connect_file, $disconnect_file, $disconnect_file)); + output("$prefix/etc/rc.d/init.d/internet", sprintf(<<'EOF', $connect_file, $connect_file, $disconnect_file, $disconnect_file)); #!/bin/bash # # internet Bring up/down internet connection @@ -269,7 +269,7 @@ exit 0 EOF chmod 0755, "$prefix/etc/rc.d/init.d/internet"; $::isStandalone ? system("/sbin/chkconfig --add internet") : do { - symlinkf ("../init.d/internet", "$prefix/etc/rc.d/rc$_") foreach + symlinkf("../init.d/internet", "$prefix/etc/rc.d/rc$_") foreach '0.d/K11internet', '1.d/K11internet', '2.d/K11internet', '3.d/S89internet', '5.d/S89internet', '6.d/K11internet'; }; } |