From f2f481bdb0ea6d98c7afb3b12a4e13d0b71b3057 Mon Sep 17 00:00:00 2001
From: "Bradley M. Kuhn" <bkuhn@ebb.org>
Date: Wed, 19 Feb 2014 18:21:06 -0500
Subject: [PATCH] exit 1 on errors in all possible cases.

---
 calendar-export.plx | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/calendar-export.plx b/calendar-export.plx
index 58780f6..8010d90 100755
--- a/calendar-export.plx
+++ b/calendar-export.plx
@@ -551,7 +551,7 @@ unless ($? == 0) {
 }
 if (not -r $CONFIG_FILE) {
   print "\${color5}$CONFIG_FILE does not exist\n";
-  exit 0;
+  exit 1;
 }
 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"
       if defined $config->{$key}
   }
-  exit 0;
+  exit 1;
 }
 FilterEmacsToICal($config->{publicDiary}, $config->{privateDiary},
                   $config->{outputDir}, $config, $config->{user});