cvs commit: qpsmtpd/lib/Qpsmtpd Transaction.pm
[email protected] (Devin Carraway)
| Newsgroups | perl.cvs.qpsmtpd |
|---|---|
| Message-ID | <[email protected]> |
cvsuser 04/06/27 17:00:51
Modified: lib/Qpsmtpd Transaction.pm
Log:
When spool_dir has improper permissions, mention what spool_dir is set to.
Revision Changes Path
1.13 +1 -1 qpsmtpd/lib/Qpsmtpd/Transaction.pm
Index: Transaction.pm
===================================================================
RCS file: /cvs/public/qpsmtpd/lib/Qpsmtpd/Transaction.pm,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -w -r1.12 -r1.13
--- Transaction.pm 27 Jun 2004 23:39:32 -0000 1.12
+++ Transaction.pm 28 Jun 2004 00:00:51 -0000 1.13
@@ -81,7 +81,7 @@
if (-e $spool_dir) {
my $mode = (stat($spool_dir))[2];
- die "Permissions on the spool_dir are not 0700" if $mode & 07077;
+ die "Permissions on spool_dir $spool_dir are not 0700" if $mode & 07077;
}
-d $spool_dir or mkdir($spool_dir, 0700) or die "Could not create spool_dir $spool_dir: $!";