j3d1/tinc
1
0
Fork 0
Code Issues 1 Pull requests Releases Wiki Activity

Errors will not terminate the script or result in a nonzero exit code.

Browse source
This commit is contained in:
Ivo Timmermans 2000-05-19 00:15:37 +00:00
parent 4ef2a8cfdb
commit 01352f4c52
1 changed files with 7 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
debian/init.d vendored
View file

@ -1,7 +1,7 @@
#! /usr/bin/perl -w
#
# System startup script for tinc
# $Id: init.d,v 1.7 2000/05/18 23:09:31 zarq Exp $
# $Id: init.d,v 1.8 2000/05/19 00:15:37 zarq Exp $
#
# Based on Lubomir Bulej's Redhat init script.
#
@ -25,7 +25,10 @@ if (! -f $DAEMON) { exit 0; }
sub find_nets {
open(FH, $NETSFILE) || die "Please create $NETSFILE.\n";
if(! open(FH, $NETSFILE)) {
warn "Please create $NETSFILE.\n";
exit 0;
}
while (<FH>) {
chomp;
if( /^[ ]*([^ \#]+)/i ) {
@ -33,7 +36,8 @@ sub find_nets {
}
}
if($#NETS == -1) {
die "$NETSFILE doesn't contain any nets.\n";
warn "$NETSFILE doesn't contain any nets.\n";
exit 0;
}
}