File Coverage

lib/Context/Singleton/Frame/Promise/Builder.pm

Criterion	Covered	Total	%
statement	16	16	100.0
branch	2	2	100.0
condition			n/a
subroutine	6	6	100.0
pod	0	3	0.0
total	24	27	88.8

use strict;
use warnings;

package Context::Singleton::Frame::Promise::Builder;

our $VERSION = v1.0.4;

use parent qw[ Context::Singleton::Frame::Promise ];

sub new {
	my ($class, %params) = @_;

	my $self = $class->SUPER::new (%params);

	$self->{builder} = $params{builder};

	$self;
}

sub builder {
	$_[0]->{builder};
}

sub notify_deducible {
	my ($self, $in_depth) = @_;

	$self->set_deducible ($in_depth)
		if $self->deducible_dependencies == $self->dependencies;
}

1;