projects
/
gitmo/Moo.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
kill each
[gitmo/Moo.git]
/
lib
/
Moo
/
HandleMoose.pm
diff --git
a/lib/Moo/HandleMoose.pm
b/lib/Moo/HandleMoose.pm
index
2b861ee
..
b68d19a
100644
(file)
--- a/
lib/Moo/HandleMoose.pm
+++ b/
lib/Moo/HandleMoose.pm
@@
-140,7
+140,8
@@
sub inject_real_metaclass_for {
}
}
}
- while (my ($meth_name, $meth_code) = each %methods) {
+ for my $meth_name (keys %methods) {
+ my $meth_code = $methods{$meth_name};
$meta->add_method($meth_name, $meth_code) if $meth_code;
}