diff options
| author | Sergey Poznyakoff <gray@gnu.org> | 2019-05-26 09:20:32 +0300 |
|---|---|---|
| committer | Sergey Poznyakoff <gray@gnu.org> | 2019-05-26 09:33:43 +0300 |
| commit | f12defd06dfab84dd5a6a1d6f9839d6bb3af2c62 (patch) | |
| tree | 7f7b3c3f3a2fe45161e2855c9a9ce73a67dfc612 | |
| parent | 585a5a925342c357d46fbad273bfafc03bc33dcd (diff) | |
| download | config-haproxy-1.03.tar.gz config-haproxy-1.03.tar.bz2 | |
Config::HAProxy version 1.03v1.03
| -rw-r--r-- | Changes | 6 | ||||
| -rw-r--r-- | lib/Config/HAProxy.pm | 18 | ||||
| -rw-r--r-- | t/Test/HAProxy.pm | 1 |
3 files changed, 16 insertions, 9 deletions
@@ -1,4 +1,10 @@ Revision history for Perl extension Config::HAProxy. +1.03 Sun May 26 09:12:10 2019 + - implement configuration syntax check + +1.02 Mon Jul 16 07:38:31 2018 + - remove the leftover use of autodie + 1.01 Thu Jul 12 09:04:28 2018 - set minimal required Perl version diff --git a/lib/Config/HAProxy.pm b/lib/Config/HAProxy.pm index ff4fa8a..794a80f 100644 --- a/lib/Config/HAProxy.pm +++ b/lib/Config/HAProxy.pm @@ -17,5 +17,5 @@ use IPC::Cmd; use Carp; -our $VERSION = '1.01'; +our $VERSION = '1.03'; my %sections = ( @@ -430,8 +430,9 @@ Returns the last node in the tree. =head2 lint - $cfg->lint(%ARGS); + $cfg->lint(%hash); -Configures syntax checking program to be run before saving. Takes a -hash as argument. Allowed keys are: +Configures configuration syntax check. The check will be run by the B<save> +method prior to writing to the configuration file. Takes a hash as argument. +Allowed keys are: =over 4 @@ -443,5 +444,6 @@ If I<BOOL> is 0, disables syntax check. Default is 1. =item B<command =E<gt> I<CMD>> -Configures the command to use for syntax check. The command will be run as +Defines the shell command to use for syntax check. The command will be run +as CMD FILE @@ -453,5 +455,5 @@ Default command is B<haproxy -c -f>. =item B<path =E<gt> I<PATH>> -Sets the search path for the check program. I<PATH> is a colon-delimited +Sets the search path for the syntax checker. I<PATH> is a colon-delimited list of directories. Unless the first word of B<command> is an absolute file name, it will be looked for in these directories. The first match @@ -468,6 +470,6 @@ Returns the command name. Saves the parse tree in the configuration file. Syntax check will be run prior to saving (unless previously disabled). If syntax errors are discovered, -the method will B<croak> with the appropriate diagnostics, beginning with -words C<Syntax check failed:>. +the method will B<croak> with a diagnostic message starting with words +C<Syntax check failed:>. If I<%hash> contains a non-zero B<dry_run> value, B<save> will only run syntax diff --git a/t/Test/HAProxy.pm b/t/Test/HAProxy.pm index b5b8a19..ca7d8ce 100644 --- a/t/Test/HAProxy.pm +++ b/t/Test/HAProxy.pm @@ -5,5 +5,4 @@ use parent 'Config::HAProxy'; use File::Basename; use File::Temp; -use autodie; sub new { |