diff options
Diffstat (limited to 'fml/lib')
| -rw-r--r-- | fml/lib/Mail/Delivery/Queue.pm | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/fml/lib/Mail/Delivery/Queue.pm b/fml/lib/Mail/Delivery/Queue.pm index 1683934f..c0c0617e 100644 --- a/fml/lib/Mail/Delivery/Queue.pm +++ b/fml/lib/Mail/Delivery/Queue.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: Queue.pm,v 1.10 2002/01/13 15:46:53 fukachan Exp $ +# $FML: Queue.pm,v 1.11 2002/01/30 15:42:26 fukachan Exp $ # package Mail::Delivery::Queue; @@ -96,12 +96,12 @@ sub new $me->{ _info }->{ recipients } = File::Spec->catfile($dir, "info", "recipients", $id); for ($dir, - &File::Spec->catfile($dir, "active"), - &File::Spec->catfile($dir, "new"), - &File::Spec->catfile($dir, "deferred"), - &File::Spec->catfile($dir, "info"), - &File::Spec->catfile($dir, "info", "sender"), - &File::Spec->catfile($dir, "info", "recipients")) { + File::Spec->catfile($dir, "active"), + File::Spec->catfile($dir, "new"), + File::Spec->catfile($dir, "deferred"), + File::Spec->catfile($dir, "info"), + File::Spec->catfile($dir, "info", "sender"), + File::Spec->catfile($dir, "info", "recipients")) { -d $_ || _mkdirhier($_); } |