summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-08-24 00:21:53 +0000
committerdamien <damien@mandriva.com>2001-08-24 00:21:53 +0000
commite79ea7e6ae2c0d17d411c19bc441bdb89533ef21 (patch)
tree4dcfe5f8eb1d4bf2541d21e1d3b5c403669952ac /perl-install
parent98e5b751926944de8b51f88df086d5a49f2c88df (diff)
downloaddrakx-e79ea7e6ae2c0d17d411c19bc441bdb89533ef21.tar
drakx-e79ea7e6ae2c0d17d411c19bc441bdb89533ef21.tar.gz
drakx-e79ea7e6ae2c0d17d411c19bc441bdb89533ef21.tar.bz2
drakx-e79ea7e6ae2c0d17d411c19bc441bdb89533ef21.tar.xz
drakx-e79ea7e6ae2c0d17d411c19bc441bdb89533ef21.zip
export write_initscript, correct initscript.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/tools.pm17
1 files changed, 7 insertions, 10 deletions
diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm
index ac7ab6863..b8a043204 100644
--- a/perl-install/network/tools.pm
+++ b/perl-install/network/tools.pm
@@ -6,7 +6,7 @@ use vars qw(@ISA @EXPORT);
use MDK::Common::Globals "network", qw($in $prefix $disconnect_file $connect_prog $connect_file $disconnect_file);
@ISA = qw(Exporter);
-@EXPORT = qw(write_cnx_script write_secret_backend ask_connect_now connect_backend disconnect_backend read_providers_backend ask_info2 type2interface connected disconnected);
+@EXPORT = qw(write_cnx_script write_secret_backend write_initscript ask_connect_now connect_backend disconnect_backend read_providers_backend ask_info2 type2interface connected disconnected);
@EXPORT_OK = qw($in);
sub write_cnx_script {
@@ -123,21 +123,18 @@ sub write_initscript {
# chkconfig: 2345 11 89
# description: Activates/Deactivates the internet interfaces
#
-# dam's damien@mandrakesoft.com
+# dam's (damien@mandrakesoft.com)
+
+# Source function library.
+. /etc/rc.d/init.d/functions
case "$1" in
start)
- echo -n "Checking internet connections to start at boot: " } . "
- $connect_file --boot_time" . q{
+ action "Checking internet connections to start at boot" "} . "$connect_file --boot_time" . q{"
touch /var/lock/subsys/internet
- echo -n internet
- echo
;;
stop)
- echo -n "Stopping internet connection if needed: " } . "
- $disconnect_file" . q{
- echo -n internet
- echo
+ action "Stopping internet connection if needed: " "} . "$disconnect_file" . q{"
rm -f /var/lock/subsys/internet
;;
restart)