#!/usr/bin/perl
+# This is automatically generated by author/import-moose-test.pl.
+# DO NOT EDIT THIS FILE. ANY CHANGES WILL BE LOST!!!
+use t::lib::MooseCompat;
use strict;
use warnings;
use Test::More;
-BEGIN {
- eval "use Test::Output;";
- plan skip_all => "Test::Output is required for this test" if $@;
- plan tests => 2;
-}
+use Test::Exception;
-stderr_like( sub { package main; eval 'use Mouse' },
- qr/\QMouse does not export its sugar to the 'main' package/,
- 'Mouse warns when loaded from the main package' );
+lives_ok {
+ eval 'use Mouse';
+} "export to main";
-stderr_like( sub { package main; eval 'use Mouse::Role' },
- qr/\QMouse::Role does not export its sugar to the 'main' package/,
- 'Mouse::Role warns when loaded from the main package' );
+isa_ok( main->meta, "Mouse::Meta::Class" );
+
+isa_ok( main->new, "main");
+isa_ok( main->new, "Mouse::Object" );
+
+done_testing;