renamed module

diff --git a/examples/Method2.pm b/examples/Methods.pm
similarity index 82%
rename from examples/Method2.pm
rename to examples/Methods.pm
index 183575f..2f79e7a 100644 (file)
--- a/examples/Method2.pm
+++ b/examples/Methods.pm
@@ -4,7 +4,7 @@ use Keyword;
 use Data::Dumper;
 
 keyword method (ident?, proto?, block) {
-#      $block->begin("warn 'hello from me';");
+       $block->begin("warn 'hello from me';");
        $block->name($ident);
 };
 

diff --git a/t/02-keyword-method.t b/t/02-keyword-method.t
index f8471d9..2d22e46 100644 (file)
--- a/t/02-keyword-method.t
+++ b/t/02-keyword-method.t
@@ -1,11 +1,11 @@
 package Foobar;
 use strict;
 use warnings;
-use lib 'examples/';
-use Method2;
+use lib 'examples';
+use Methods;
 
 method something ($a, $b, $c) { 
-       warn "oooK"; 
+       return 1; 
 };
 
 
@@ -14,6 +14,6 @@ method something ($a, $b, $c) {
 use Test::More qw/no_plan/;
 use Data::Dumper;
 
-Foobar->something;
+ok (Foobar->something);
 
 ok 1;