Error messages for conky output.
This commit is contained in:
parent
7c8934af26
commit
c2bbeaf556
1 changed files with 9 additions and 1 deletions
|
|
@ -80,7 +80,15 @@ sub WriteRecentUrgentEmailAnnouncements ($$) {
|
||||||
# Test if network is up
|
# Test if network is up
|
||||||
system('/bin/ping -q -w 20 -c 5 pine.sfconservancy.org > /dev/null 2>&1');
|
system('/bin/ping -q -w 20 -c 5 pine.sfconservancy.org > /dev/null 2>&1');
|
||||||
|
|
||||||
exit 1 if ($? != 0);
|
if ($? != 0) {
|
||||||
|
print "\${color5}Network not up!\n";
|
||||||
|
exit 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (not -f $ARGV[1]) {
|
||||||
|
print "\${color5}File $ARGV[1] not readable!\n";
|
||||||
|
exit 0;
|
||||||
|
}
|
||||||
|
|
||||||
my $output = "";
|
my $output = "";
|
||||||
my $record = "";
|
my $record = "";
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue