X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F001_mouse%2F015-demolish.t;h=486d4713d49333e8535b49879180d4936200583c;hb=81c629ebda18684a5bc69906308113423a7a58b4;hp=4fad8c6c5b5f3be86899fa1b72b1f929f44e8760;hpb=289e54309468b5da0fb0774fd1db627ee337fb82;p=gitmo%2FMouse.git diff --git a/t/001_mouse/015-demolish.t b/t/001_mouse/015-demolish.t index 4fad8c6..486d471 100644 --- a/t/001_mouse/015-demolish.t +++ b/t/001_mouse/015-demolish.t @@ -37,7 +37,7 @@ do { is_deeply([splice @called], [], "no DEMOLISH calls yet"); -with_immutable { +with_immutable sub { ok(Class->meta, Class->meta->is_immutable ? 'mutable' : 'immutable'); { @@ -64,4 +64,4 @@ with_immutable { } is_deeply([splice @called], ['Child::DEMOLISH', 'Class::DEMOLISH'], 'DEMOLISHALL'); -} qw(Class Child); +}, qw(Class Child);