diff options
Diffstat (limited to 'lacme')
-rwxr-xr-x | lacme | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -689,7 +689,8 @@ sub install_cert(%) { my $mode; if ((my $m = $args{mode}) ne "") { - $mode = oct($m) // die; + die "Not an octal string: $m\n" unless $m =~ /^[0-9]+$/; + $mode = oct($m); } else { my $umask = umask() // die; $mode = 0644 &~ $umask; |