[gitmo/Moo.git] / t / global_underscore.t

use strict;
use warnings;
use Test::More;
use lib qw(t/lib);

use_ok('UnderscoreClass');

is(
	UnderscoreClass->c1,
	'c1',
);

is(
	UnderscoreClass->r1,
	'r1',
);

is(
	ClobberUnderscore::h1(),
	'h1',
);

done_testing;
Commit	Line	Data
141b507a	1	use strict;
	2	use warnings;
	3	use Test::More;
	4	use lib qw(t/lib);
	5
	6	use_ok('UnderscoreClass');
	7
	8	is(
	9	UnderscoreClass->c1,
	10	'c1',
	11	);
	12
	13	is(
	14	UnderscoreClass->r1,
	15	'r1',
	16	);
	17
	18	is(
	19	ClobberUnderscore::h1(),
	20	'h1',
	21	);
	22
	23	done_testing;