diff options
| author | Guilhem Moulin <guilhem.moulin@ens-lyon.org> | 2011-10-25 22:21:12 +0200 |
|---|---|---|
| committer | Guilhem Moulin <guilhem.moulin@ens-lyon.org> | 2011-10-25 22:21:12 +0200 |
| commit | 4933a6fdc940b1f7b74b3bb16f0e52b169c6865c (patch) | |
| tree | 8db6c2e6dc643cadea72ef444e00a4141fb938f6 /imapurge.pl | |
| parent | dc82b3f724d9613ef1bf517475e099ad46deff1f (diff) | |
config error
Diffstat (limited to 'imapurge.pl')
| -rwxr-xr-x | imapurge.pl | 1 |
1 files changed, 1 insertions, 0 deletions
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 |