X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=t%2F055-exporter.t;h=7f945c64dbdeb37efd9b350bf980e6b8912425cc;hp=c089885b4df07f5334f42d8681a1a4ba6e57ee61;hb=8cbcbb47d0f02077d07873c553494a884d9c085f;hpb=62cb95055e59150dbefa0192f16f91485d047979 diff --git a/t/055-exporter.t b/t/055-exporter.t index c089885..7f945c6 100644 --- a/t/055-exporter.t +++ b/t/055-exporter.t @@ -22,6 +22,10 @@ BEGIN{ Mouse::Exporter->setup_import_methods( as_is => [\&bar], also => [qw(MyMouse)], + +# groups => { +# foobar_only => [qw(foo bar)], +# }, ); sub bar{ 200 } @@ -62,3 +66,16 @@ can_ok 'MyMouseEx', qw(import unimport); ok !defined(&bar), 'foo is also unimported'; ok !defined(&has), 'has is also unimported'; } + +# exporting groups are not implemented in Moose::Exporter +#{ +# package MyAppExTags; +# use Test::More; +# use MyMouseEx qw(:foobar_only); +# +# can_ok __PACKAGE__, 'meta'; +# ok defined(&foo); +# ok defined(&bar); +# ok!defined(&has), "export tags"; +#} +