[gitmo/MooseX-Antlers.git] / t / track_eval.t

use strict;
use warnings;
use aliased 'MooseX::Antlers::EvalTracker';

my $et = EvalTracker->new;

$et->enable;

{
  package Foo;

  use Moose;

  has 'test' => (is => 'rw', trigger => sub { warn "trigger!\n" });
}
Commit	Line	Data
699c71b8	1	use strict;
	2	use warnings;
	3	use aliased 'MooseX::Antlers::EvalTracker';
	4
	5	my $et = EvalTracker->new;
	6
	7	$et->enable;
	8
	9	{
	10	package Foo;
	11
	12	use Moose;
	13
	14	has 'test' => (is => 'rw', trigger => sub { warn "trigger!\n" });
	15	}