Add a test for loading Moose::Role into main (which now also warns)
Dave Rolsky [Wed, 6 Aug 2008 18:37:16 +0000 (18:37 +0000)]
t/010_basics/016_load_into_main.t

index c8cc9fd..683ae4b 100644 (file)
@@ -8,9 +8,13 @@ use Test::More;
 BEGIN {
     eval "use Test::Output;";
     plan skip_all => "Test::Output is required for this test" if $@;
-    plan tests => 1;
+    plan tests => 2;
 }
 
 stderr_is( sub { package main; eval 'use Moose' },
            "Moose does not export its sugar to the 'main' package.\n",
            'Moose warns when loaded from the main package' );
+
+stderr_is( sub { package main; eval 'use Moose::Role' },
+           "Moose::Role does not export its sugar to the 'main' package.\n",
+           'Moose::Role warns when loaded from the main package' );