Add testcase for calling a method with the name of a declarator.
Florian Ragwitz [Sun, 10 May 2009 00:01:43 +0000 (00:01 +0000)]
t/method-installer-runtime.t

index 86dbdf3..62926b4 100644 (file)
@@ -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');