X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fmethod-installer-runtime.t;fp=t%2Fmethod-installer-runtime.t;h=62926b460a771d76e965d79f7d03039c17de2589;hb=09ca664a0e665141ebf4d6cb101141f9b1e908e9;hp=86dbdf3c7ec2849a5623d1e0611207f45d3819eb;hpb=36a3c10611b1429d4e837f711616bd0dc147191d;p=p5sagit%2FDevel-Declare.git diff --git a/t/method-installer-runtime.t b/t/method-installer-runtime.t index 86dbdf3..62926b4 100644 --- a/t/method-installer-runtime.t +++ b/t/method-installer-runtime.t @@ -12,7 +12,9 @@ BEGIN { ok(!main->can('foo'), 'foo() not installed yet'); -method foo { } +method foo { + $_[0]->method +} ok(main->can('foo'), 'foo() installed at runtime');