Merge pull request #65 from ktat/plugin_init_option

add plugin file for test.
nekokak · Apr 4, 2012 · 13fbed9 · 13fbed9
2 parents 00a9e21 + 429cfdc
commit 13fbed9
Showing 1 changed file with 27 additions and 0 deletions.
diff --git a/t/lib/Teng/Plugin/ArgsTest.pm b/t/lib/Teng/Plugin/ArgsTest.pm
@@ -0,0 +1,27 @@
+package
+  Teng::Plugin::ArgsTest;
+
+use strict;
+use warnings;
+
+our @EXPORT = qw/args_class args_opt/;
+my %args;
+
+sub init {
+    my ($pkg, $class, $opt) = @_;
+    $args{class} = $class;
+    $args{opt} = $opt;
+}
+
+sub args_class {
+    my ($self) = @_;
+    return $args{class};
+}
+
+sub args_opt {
+    my ($self) = @_;
+    return $args{opt};
+}
+
+1;
+