X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F050_metaclasses%2F052_new_object_BUILD.t;fp=t%2F050_metaclasses%2F052_new_object_BUILD.t;h=0000000000000000000000000000000000000000;hb=9864f0e4ba233c5f30ad6dc7c484ced43d883d27;hp=b3badc83008dff8151e8d80480cd71da6a4dbe43;hpb=8845df4dd6432e3164d078ade741409061adae9f;p=gitmo%2FMouse.git diff --git a/t/050_metaclasses/052_new_object_BUILD.t b/t/050_metaclasses/052_new_object_BUILD.t deleted file mode 100644 index b3badc8..0000000 --- a/t/050_metaclasses/052_new_object_BUILD.t +++ /dev/null @@ -1,23 +0,0 @@ -#!/usr/bin/env 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; - -my $called; -{ - package Foo; - use Mouse; - - sub BUILD { $called++ } -} - -Foo->new; -is($called, 1, "BUILD called from ->new"); -$called = 0; -Foo->meta->new_object; -is($called, 1, "BUILD called from ->meta->new_object"); - -done_testing;