You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
27 lines
756 B
27 lines
756 B
8 years ago
|
{
|
||
|
|
my $ssl = $DB->get('modSSL');
|
||
|
|
my $crt = $ssl->prop('crt');
|
||
|
|
my $key = $ssl->prop('key');
|
||
|
|
my $chain = $ssl->prop('CertificateChainFile');
|
||
|
|
return unless (
|
||
|
|
defined $crt &&
|
||
|
|
defined $key &&
|
||
|
|
defined $chain
|
||
|
|
);
|
||
|
|
|
||
|
|
my ($new_crt, $new_key, $new_chain) = ($crt, $key, $chain);
|
||
|
|
$new_crt =~ s|/home/e-smith/db/letsencrypt\.sh|/home/e-smith/db/dehydrated|;
|
||
|
|
$new_key =~ s|/home/e-smith/db/letsencrypt\.sh|/home/e-smith/db/dehydrated|;
|
||
|
|
$new_chain =~ s|/home/e-smith/db/letsencrypt\.sh|/home/e-smith/db/dehydrated|;
|
||
|
|
|
||
|
|
return unless (
|
||
|
|
$crt ne $new_crt &&
|
||
|
|
$key ne $new_key &&
|
||
|
|
$chain ne $new_chain
|
||
|
|
);
|
||
|
|
|
||
|
|
$ssl->set_prop('crt', $crt);
|
||
|
|
$ssl->set_prop('key', $key);
|
||
|
|
$ssl->set_prop('CertificateChainFile', $new_chain);
|
||
|
|
}
|