eval { use Scalar::Util };
}
-our $VERSION = '2.19';
+our $VERSION = '2.23';
sub new {
my $class = shift || croak "Usage: ".__PACKAGE__."->new";
my $self = shift;
my $step = shift;
+ my $hash_form = $self->run_hook('hash_form', $step) || {};
my $hash_base = $self->run_hook('hash_base', $step) || {};
my $hash_comm = $self->run_hook('hash_common', $step) || {};
- my $hash_form = $self->run_hook('hash_form', $step) || {};
my $hash_fill = $self->run_hook('hash_fill', $step) || {};
my $hash_swap = $self->run_hook('hash_swap', $step) || {};
my $hash_errs = $self->run_hook('hash_errors', $step) || {};
return $self->{'conf'} ||= do {
my $conf = $self->conf_file;
if (! ref $conf) {
- $conf = $self->conf_obj->read($conf, {no_warn_on_fail => 1}) || $self->conf_die_on_fail ? croak $@ : {};
+ $conf = $self->conf_obj->read($conf, {no_warn_on_fail => 1}) || ($self->conf_die_on_fail ? croak $@ : {});
}
my $hash = $self->conf_validation;
if ($hash && scalar keys %$hash) {
my $i = shift || 0;
my $ref = $self->path;
return '' if $i < 0;
-# return $self->default_step if $i > $#$ref;
return $ref->[$i];
}