From e8a9828e4ec8a908e56708bfde7c37b865ce5873 Mon Sep 17 00:00:00 2001
From: Matt Sergeant <matt@sergeant.org>
Date: Fri, 15 Jul 2005 21:15:44 +0000
Subject: [PATCH] Notice /var/qmail/control dir (Joe Schaefer)

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@510 958fd67b-6ff1-0310-b445-bb7760255be9
---
 lib/Apache/Qpsmtpd.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lib/Apache/Qpsmtpd.pm b/lib/Apache/Qpsmtpd.pm
index 5161301..edb28c5 100644
--- a/lib/Apache/Qpsmtpd.pm
+++ b/lib/Apache/Qpsmtpd.pm
@@ -90,8 +90,10 @@ 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 {