summaryrefslogtreecommitdiffstats
path: root/t
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2009-09-23 01:26:51 -0500
committerJesse Luehrs <doy@tozt.net>2009-09-23 01:26:51 -0500
commit9e2ca78efe5d76f5308b9843081e5c90a461f6f1 (patch)
tree6f3f0fa5964f5c2a206ea72afe787b02085b27c2 /t
parent19435a164724e1cc3dab3ff8c3cd42392eb67c20 (diff)
downloadmoosex-methodtraits-9e2ca78efe5d76f5308b9843081e5c90a461f6f1.tar.gz
moosex-methodtraits-9e2ca78efe5d76f5308b9843081e5c90a461f6f1.zip
handle passing in no coderef (for existing methods)HEADmaster
Diffstat (limited to 't')
-rw-r--r--t/004-generate-method.t2
1 files changed, 2 insertions, 0 deletions
diff --git a/t/004-generate-method.t b/t/004-generate-method.t
index 38165a2..b23a9b0 100644
--- a/t/004-generate-method.t
+++ b/t/004-generate-method.t
@@ -13,6 +13,8 @@ BEGIN {
alias => {
traits => ['Foo::Alias'],
munge => sub {
+ my $meta = shift;
+ my $alias_name = shift;
my $name = shift;
return sub { shift->$name(@_) },
{ aliased_from => $name, @_ };