summaryrefslogtreecommitdiff
path: root/pingd
diff options
context:
space:
mode:
authorPeter Palfrader <peter@palfrader.org>2002-08-12 03:06:53 +0000
committerPeter Palfrader <peter@palfrader.org>2002-08-12 03:06:53 +0000
commitb2f60e82fbda37a4af217f55407a2cfd2c1e4ddc (patch)
tree98df3cb6da11c4b4a5053bfc8041ffea443ad9a9 /pingd
parent5bed60a2cba93a8e026f2fe065ed12338b47eb54 (diff)
Config option mailindir was renamed to mailin. You now can also point it to a mbox format mailbox now.
Diffstat (limited to 'pingd')
-rwxr-xr-xpingd18
1 files changed, 10 insertions, 8 deletions
diff --git a/pingd b/pingd
index 492121f..d4b4763 100755
--- a/pingd
+++ b/pingd
@@ -3,7 +3,7 @@
$| = 1;
# (c) 2002 Peter Palfrader <peter@palfrader.org>
-# $Id: pingd,v 1.59 2002/08/11 14:57:23 weasel Exp $
+# $Id: pingd,v 1.60 2002/08/12 03:06:53 weasel Exp $
#
=pod
@@ -496,16 +496,18 @@ sub make_dirs() {
confess ("Cannot create directory $dir: $!\n");
};
};
- for my $dir (
- Echolot::Config::get()->{'mailindir'},
- Echolot::Config::get()->{'mailindir'}.'/cur',
- Echolot::Config::get()->{'mailindir'}.'/tmp',
- Echolot::Config::get()->{'mailindir'}.'/new',
+ my @dirs = (
Echolot::Config::get()->{'mailerrordir'},
Echolot::Config::get()->{'mailerrordir'}.'/cur',
Echolot::Config::get()->{'mailerrordir'}.'/tmp',
- Echolot::Config::get()->{'mailerrordir'}.'/new'
- ) {
+ Echolot::Config::get()->{'mailerrordir'}.'/new');
+ push @dirs, (
+ Echolot::Config::get()->{'mailin'}.'/cur',
+ Echolot::Config::get()->{'mailin'}.'/tmp',
+ Echolot::Config::get()->{'mailin'}.'/new' )
+ if (-d Echolot::Config::get()->{'mailin'});
+
+ for my $dir (@dirs) {
if ( ! -d $dir ) {
mkdir ($dir, 0700) or
confess ("Cannot create directory $dir: $!\n");