projects
/
gitmo/Moose.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Revert "Moose now warns about class implicitly overriding methods from local"
[gitmo/Moose.git]
/
t
/
300_immutable
/
003_immutable_meta_class.t
1
#!/usr/bin/perl
2
3
use strict;
4
use warnings;
5
6
use Test::More tests => 1;
7
use Test::Exception;
8
9
10
11
{
12
package My::Meta;
13
14
use Moose;
15
16
extends 'Moose::Meta::Class';
17
18
has 'meta_size' => (
19
is => 'rw',
20
isa => 'Int',
21
);
22
}
23
24
lives_ok {
25
My::Meta->meta()->make_immutable(debug => 0)
26
} '... can make a meta class immutable';
27