projects
/
gitmo/Class-MOP.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Use AuthorRequires to force authors to run all tests
[gitmo/Class-MOP.git]
/
examples
/
ArrayBasedStorage.pod
diff --git
a/examples/ArrayBasedStorage.pod
b/examples/ArrayBasedStorage.pod
index
bff9baa
..
5c0369c
100644
(file)
--- a/
examples/ArrayBasedStorage.pod
+++ b/
examples/ArrayBasedStorage.pod
@@
-23,7
+23,7
@@
sub new {
sub create_instance {
my $self = shift;
- my $instance = $self->bless_instance_structure([]);
+ my $instance = bless [], $self->_class_name;
$self->initialize_all_slots($instance);
return $instance;
}