view release on metacpan or  search on metacpan

lib/Decision/Depends.pm  view on Meta::CPAN

);

our $VERSION = '0.21';

use Carp;
use Decision::Depends::OO;

our $self = Decision::Depends::OO->new();

## no critic ( ProhibitSubroutinePrototypes )
sub if_dep(&@)
{
  my ( $deps, $run ) = @_;
  my @args = &$deps;

  local $Carp::CarpLevel = $Carp::CarpLevel + 1;

  $self->if_dep( \@args, $run );
}

sub action(&) { $_[0] }

sub test_dep
{
  local $Carp::CarpLevel = $Carp::CarpLevel + 1;

  $self->test_dep( @_ );
}

sub Configure
{