byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

add function to read config from environment var

Browse Source
This commit is contained in:
Dominik Meyer 2025-02-01 21:24:38 +01:00
parent df5b04d857
commit 4c3fabf014
Signed by: byterazor
GPG Key ID: EABDA0FD5981BC97
1 changed files with 14 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
lib/Qpsmtpd/Config.pm
View File

@ -127,6 +127,20 @@ sub get_qmail_map {
return \%h; return \%h;
} }
sub from_environment {
my ($self, $config) = @_;
return unless $config;
my $env_name = "QPSMTPD_" . $config;
return unless $ENV{$env_name};
my @config;
push(@config, $ENV{$env_name});
return wantarray ? @config : $config[0];
}
sub from_file { sub from_file {
my ($self, $config, $file, $visited) = @_; my ($self, $config, $file, $visited) = @_;
$file ||= $self->config_dir($config) . "/$config"; $file ||= $self->config_dir($config) . "/$config";