projects
/
gitmo/Class-MOP.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
make inlining a bit more easily extensible
[gitmo/Class-MOP.git]
/
t
/
310_inline_structor.t
diff --git
a/t/310_inline_structor.t
b/t/310_inline_structor.t
index
04732d2
..
27024ce
100644
(file)
--- a/
t/310_inline_structor.t
+++ b/
t/310_inline_structor.t
@@
-200,7
+200,7
@@
use Class::MOP;
sub _inline_destructor {
my $self = shift;
- my $code = $self->_compile_code(source => 'sub { }');
+ my $code = $self->_compile_code('sub { }');
$self->{body} = $code;
}