From c700061c7b00d18778389d0850d21f966bd25ec6 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Wed, 25 Apr 2012 01:36:31 -0500 Subject: cleanups --- t/03-custom-constructor.t | 24 ------------------------ 1 file changed, 24 deletions(-) delete mode 100644 t/03-custom-constructor.t (limited to 't/03-custom-constructor.t') 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'); -- cgit v1.2.3-54-g00ecf