default => sub { [] },
);
+has '_initialized' => (
+ is => 'ro',
+ isa => 'Bool',
+ default => undef,
+ writer => '_init_done',
+ );
+
# Create the witness before trying to add it
around 'add_witness' => sub {
my $orig = shift;
$mod->can('parse')->( $self, $init_args );
}
}
+ $self->_init_done( 1 );
return $self;
}