From 17feca20e7d0e958d43e934cdc4894a0457c2727 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Rapha=C3=ABl=20Gertz?= Date: Wed, 5 Apr 2017 19:39:47 +0200 Subject: [PATCH 1/1] Fix config generation Packaging ready --- acme.pm => Acme.pm | 0 letscert | 4 ++-- letscron | 4 ++-- 3 files changed, 4 insertions(+), 4 deletions(-) rename acme.pm => Acme.pm (100%) diff --git a/acme.pm b/Acme.pm similarity index 100% rename from acme.pm rename to Acme.pm diff --git a/letscert b/letscert index dbf245e..7c843c6 100755 --- a/letscert +++ b/letscert @@ -19,8 +19,8 @@ use strict; use warnings; -# Load acme -use acme; +# Load Acme +use Acme; # Load POSIX use POSIX qw(EXIT_SUCCESS EXIT_FAILURE); diff --git a/letscron b/letscron index e315a42..9a96355 100755 --- a/letscron +++ b/letscron @@ -31,7 +31,7 @@ use File::Spec; use File::Slurp qw(read_file write_file); use JSON qw(decode_json); use IPC::System::Simple qw(capturex $EXITVAL); -use acme qw(CERT_DIR CONFIG DS KEY_DIR SERVER_CRT SERVER_KEY); +use Acme qw(CERT_DIR CONFIG DS KEY_DIR SERVER_CRT SERVER_KEY); # Load POSIX use POSIX qw(strftime EXIT_SUCCESS EXIT_FAILURE); @@ -69,7 +69,7 @@ unless ( ! scalar map {unless(defined($_->{cert}) && defined($_->{key}) && defined($_->{mail}) && defined($_->{domain}) && defined($_->{domains})) {1;} else {();}} @{$config->{certificates}} } ) { - print 'Config file '.CONFIG.' is invalid'."\n"; + print 'Config file '.CONFIG.' is not readable or invalid'."\n"; exit EXIT_FAILURE; } -- 2.41.1