projects
/
gitmo/Class-MOP.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
add a warning for the deprecated Class::MOP::Instance->bless_intsance_structure method
[gitmo/Class-MOP.git]
/
examples
/
InsideOutClass.pod
diff --git
a/examples/InsideOutClass.pod
b/examples/InsideOutClass.pod
index
5f94a25
..
b69c10f
100644
(file)
--- a/
examples/InsideOutClass.pod
+++ b/
examples/InsideOutClass.pod
@@
-102,7
+102,7
@@
use base 'Class::MOP::Instance';
sub create_instance {
my ($self, $class) = @_;
- $self->bless_instance_structure(\(my $instance));
+ bless \(my $instance), $self->_class_name;
}
sub get_slot_value {