diff --git a/xt/sample/11_ClassStdSimple.pl b/xt/sample/11_ClassStdSimple.pl index ca5c286..2433ea0 100644 --- a/xt/sample/11_ClassStdSimple.pl +++ b/xt/sample/11_ClassStdSimple.pl @@ -27,5 +27,5 @@ # astart initializer of Class::Std class #my $c2 = ClassStdParent->new({ -# aend equal: attr1 attr2 +# aend equal: attr1 attr2 cattr1 cattr2 diff --git a/xt/sample/lib/ClassStdParent.pm b/xt/sample/lib/ClassStdParent.pm index 8ea1158..79c4f09 100644 --- a/xt/sample/lib/ClassStdParent.pm +++ b/xt/sample/lib/ClassStdParent.pm @@ -19,7 +19,7 @@ use File::Basename; # astart own initializer of BUILD in Class::Std #$arg_ref->{ - # aend equal: attr1 attr2 + # aend equal: attr1 attr2 cattr1 cattr2 } sub START { @@ -31,7 +31,7 @@ use File::Basename; # astart own initializer of START in Class::Std #$arg_ref->{ - # aend equal: attr1 attr2 + # aend equal: attr1 attr2 cattr1 cattr2 # astart own scalar of START in Class::Std #$