[gitmo/Moo.git] / xt / lib / withautoclean / R1.pm

package withautoclean::R1;
use Moo::Role;

# Doing this (or loading a class which is built with Moose)
# and then loading autoclean - everything breaks...
use Moose ();
use namespace::autoclean;
# Wouldn't happen normally, but is likely to as you part-port something.

has _ctx => (
    is => 'ro',
    default => sub {
    },
    clearer => '_clear_ctx',
);

1;
Commit	Line	Data
44a44498	1	package withautoclean::R1;
	2	use Moo::Role;
	3
	4	# Doing this (or loading a class which is built with Moose)
	5	# and then loading autoclean - everything breaks...
	6	use Moose ();
	7	use namespace::autoclean;
	8	# Wouldn't happen normally, but is likely to as you part-port something.
	9
	10	has _ctx => (
	11	is => 'ro',
	12	default => sub {
	13	},
	14	clearer => '_clear_ctx',
	15	);
	16
	17	1;
	18