diff options
author | Guilhem Moulin <guilhem@fripost.org> | 2021-02-24 21:24:13 +0100 |
---|---|---|
committer | Guilhem Moulin <guilhem@fripost.org> | 2021-02-24 21:32:06 +0100 |
commit | c6a4aaa6128d55ba5f7f3cd2bd75f789f69ae407 (patch) | |
tree | 912eca80d3ff18812456f99e3f458db4c7805204 /lacme | |
parent | c612a7ff44995f4f9c39fa0fb68470d90c88decf (diff) |
lacme: Add 'owner' resp. 'mode' as (prefered) alias for 'chown' resp. 'chmod'.
Diffstat (limited to 'lacme')
-rwxr-xr-x | lacme | 8 |
1 files changed, 6 insertions, 2 deletions
@@ -761,7 +761,8 @@ elsif ($COMMAND eq 'newOrder' or $COMMAND eq 'new-cert') { my $def = delete $h->{_} // {}; $defaults{$_} = $def->{$_} foreach keys %$def; my @valid = qw/certificate certificate-chain certificate-key min-days CAfile - hash keyUsage subject subjectAltName tlsfeature chown chmod notify/; + hash keyUsage subject subjectAltName tlsfeature + owner chown mode chmod notify/; foreach my $s (keys %$h) { $conf->{$s} = { map { $_ => delete $h->{$s}->{$_} } @valid }; die "Unknown option(s) in [$s]: ".join(', ', keys %{$h->{$s}})."\n" if %{$h->{$s}}; @@ -855,7 +856,10 @@ elsif ($COMMAND eq 'newOrder' or $COMMAND eq 'new-cert') { } } - my %install = ( content => $x509, mode => $conf->{chmod} // "", owner => $conf->{chown} // "" ); + my %install = ( content => $x509, + mode => $conf->{mode} // $conf->{chmod} // "", + owner => $conf->{owner} // $conf->{chown} // "" + ); # install certificate if ((my $path = $conf->{'certificate'} // "") ne "") { |