[svn:qpsmtpd] rev 509 - branches/0.31/lib/Apache

Author: msergeant
Date: Fri Jul 15 14:13:49 2005
New Revision: 509

Modified:
   branches/0.31/lib/Apache/Qpsmtpd.pm
Log:
Notice /var/qmail/control dir (Joe Schaefer)


Modified: branches/0.31/lib/Apache/Qpsmtpd.pm
==============================================================================
--- branches/0.31/lib/Apache/Qpsmtpd.pm	(original)
+++ branches/0.31/lib/Apache/Qpsmtpd.pm	Fri Jul 15 14:13:49 2005
@@ -90,10 +90,13 @@ sub run {
 }
 
 sub config_dir {
-    my $self = shift;
-    return "$self->{qpdir}/config";
+    my ($self, $config) = @_;
+    -e "$_/$config" and return $_
+        for "$self->{qpdir}/config";
+    return "/var/qmail/control";
 }
 
+
 sub plugin_dir {
     my $self = shift;
     return "$self->{qpdir}/plugins";