Remove references to jules git repo
[gitmo/Moose.git] / t / 300_immutable / 013_immutable_roundtrip.t
CommitLineData
43d2935a 1#!/usr/bin/perl
2
3use strict;
4use warnings;
5
3d659f7f 6use Test::More;
7BEGIN {
8 eval "use Test::Output;";
9 plan skip_all => "Test::Output is required for this test" if $@;
10 plan tests => 1;
11}
43d2935a 12
13{
14 package Foo;
15 use Moose;
16 __PACKAGE__->meta->make_immutable;
17}
c4022d38 18
19{
43d2935a 20 package Bar;
21 use Moose;
22
23 extends 'Foo';
24
25 __PACKAGE__->meta->make_immutable;
26 __PACKAGE__->meta->make_mutable;
27
679b294c 28
29 # This actually is testing for a bug in Class::MOP that cause
30 # Moose::Meta::Method::Constructor to spit out a warning when it
31 # shouldn't have done so. The bug was fixed in CMOP 0.75.
43d2935a 32 ::stderr_unlike(
33 sub { Bar->meta->make_immutable },
34 qr/Not inlining a constructor/,
35 'no warning that Bar may not have an inlined constructor'
36 );
37}
38