From 4933a6fdc940b1f7b74b3bb16f0e52b169c6865c Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem.moulin@ens-lyon.org>
Date: Tue, 25 Oct 2011 22:21:12 +0200
Subject: config error

---
 imapurge.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/imapurge.pl b/imapurge.pl
index 3b657a5..6623ba8 100755
--- a/imapurge.pl
+++ b/imapurge.pl
@@ -9,6 +9,7 @@ use strict;
 my $confile = catfile ($HOME, '.imapurge.rc');
 die "Can't read `" .$confile. "'\n" unless -f $confile;
 my %accounts = do $confile;
+die "Error in `" .$confile. "'\n" if $@ || not %accounts;
 
 
 # Remotely delete mails that have been sent >90 days ago
-- 
cgit v1.2.3