diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/network/tools.pm | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm index cc4a5f14b..efb7f1bed 100644 --- a/perl-install/network/tools.pm +++ b/perl-install/network/tools.pm @@ -130,11 +130,19 @@ sub write_initscript { case "$1" in start) - action "Checking internet connections to start at boot" "} . "$connect_file --boot_time" . q{" + if [ -e } . $connect_file . q{ ]; then + action "Checking internet connections to start at boot" "} . "$connect_file --boot_time" . q{" + else + action "No connection to start" "true" + fi touch /var/lock/subsys/internet ;; stop) - action "Stopping internet connection if needed: " "} . "$disconnect_file --boot_time" . q{" + if [ -e } . $disconnect_file . q{ ]; then + action "Stopping internet connection if needed: " "} . "$disconnect_file --boot_time" . q{" + else + action "No connection to stop" "true" + fi rm -f /var/lock/subsys/internet ;; restart) |