exit 1 on errors in all possible cases.

This commit is contained in:
Bradley M. Kuhn 2014-02-19 18:21:06 -05:00
parent 2067946044
commit f2f481bdb0

View file

@ -551,7 +551,7 @@ unless ($? == 0) {
} }
if (not -r $CONFIG_FILE) { if (not -r $CONFIG_FILE) {
print "\${color5}$CONFIG_FILE does not exist\n"; print "\${color5}$CONFIG_FILE does not exist\n";
exit 0; exit 1;
} }
my $config = ReadConfig($CONFIG_FILE); my $config = ReadConfig($CONFIG_FILE);
@ -576,7 +576,7 @@ unless ((defined $config->{publicDiary} and -r $config->{publicDiary}) or
print "\${color5}$key file, $config->{$key} does not exist\n" print "\${color5}$key file, $config->{$key} does not exist\n"
if defined $config->{$key} if defined $config->{$key}
} }
exit 0; exit 1;
} }
FilterEmacsToICal($config->{publicDiary}, $config->{privateDiary}, FilterEmacsToICal($config->{publicDiary}, $config->{privateDiary},
$config->{outputDir}, $config, $config->{user}); $config->{outputDir}, $config, $config->{user});