diff options
Diffstat (limited to 't/03-custom-constructor.t')
-rw-r--r-- | t/03-custom-constructor.t | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/t/03-custom-constructor.t b/t/03-custom-constructor.t deleted file mode 100644 index cb12835..0000000 --- a/t/03-custom-constructor.t +++ /dev/null @@ -1,24 +0,0 @@ -#!/usr/bin/env perl -use strict; -use warnings; -use Test::More tests => 1; - -our $custom_constructor_called = 0; - -package Foo; -use Moose; -use MooseX::ABC; - -requires 'bar', 'baz'; - -package Foo::Sub; -use Moose; -extends 'Foo'; - -sub bar { } -sub baz { } -sub new { $::custom_constructor_called++; shift->SUPER::new(@_) } - -package main; -my $foosub = Foo::Sub->new; -ok($custom_constructor_called, 'custom constructor was called'); |