Notice /var/qmail/control dir (Joe Schaefer)
git-svn-id: https://svn.perl.org/qpsmtpd/branches/0.31@509 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
bcbe2ac25f
commit
162cf7d132
@ -90,10 +90,13 @@ sub run {
|
|||||||
}
|
}
|
||||||
|
|
||||||
sub config_dir {
|
sub config_dir {
|
||||||
my $self = shift;
|
my ($self, $config) = @_;
|
||||||
return "$self->{qpdir}/config";
|
-e "$_/$config" and return $_
|
||||||
|
for "$self->{qpdir}/config";
|
||||||
|
return "/var/qmail/control";
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
sub plugin_dir {
|
sub plugin_dir {
|
||||||
my $self = shift;
|
my $self = shift;
|
||||||
return "$self->{qpdir}/plugins";
|
return "$self->{qpdir}/plugins";
|
||||||
|
Loading…
Reference in New Issue
Block a user