summaryrefslogtreecommitdiff
path: root/xt
diff options
context:
space:
mode:
authorfranck cuny <franck@lumberjaph.net>2009-06-30 11:24:57 +0200
committerfranck cuny <franck@lumberjaph.net>2009-06-30 11:24:57 +0200
commit2cbd7056206d1c0f5b8f9f0ded4cda65ed784cb8 (patch)
tree9dc03b8a57a6dee24629866de30c7cd572087072 /xt
parentinitial commit (diff)
downloadmoosex-methodprivate-2cbd7056206d1c0f5b8f9f0ded4cda65ed784cb8.tar.gz
private and protectd methods and basic tests
Diffstat (limited to '')
-rw-r--r--t/02_pod.t (renamed from xt/03_pod.t)0
-rw-r--r--xt/02_perlcritic.t8
-rw-r--r--xt/perlcriticrc2
-rw-r--r--xt/run.t4
-rw-r--r--xt/tests/Test/MooseX/MethodPrivate.pm25
5 files changed, 0 insertions, 39 deletions
diff --git a/xt/03_pod.t b/t/02_pod.t
index 437887a..437887a 100644
--- a/xt/03_pod.t
+++ b/t/02_pod.t
diff --git a/xt/02_perlcritic.t b/xt/02_perlcritic.t
deleted file mode 100644
index b977df8..0000000
--- a/xt/02_perlcritic.t
+++ /dev/null
@@ -1,8 +0,0 @@
-use strict;
-use Test::More;
-eval {
- require Test::Perl::Critic;
- Test::Perl::Critic->import( -profile => 'xt/perlcriticrc');
-};
-plan skip_all => "Test::Perl::Critic is not installed." if $@;
-all_critic_ok('lib');
diff --git a/xt/perlcriticrc b/xt/perlcriticrc
deleted file mode 100644
index fa96144..0000000
--- a/xt/perlcriticrc
+++ /dev/null
@@ -1,2 +0,0 @@
-[TestingAndDebugging::ProhibitNoStrict]
-allow=refs
diff --git a/xt/run.t b/xt/run.t
deleted file mode 100644
index 88e3cd5..0000000
--- a/xt/run.t
+++ /dev/null
@@ -1,4 +0,0 @@
-use lib 'xt/tests';
-use Test::MooseX::MethodPrivate;
-
-Test::Class->runtests;
diff --git a/xt/tests/Test/MooseX/MethodPrivate.pm b/xt/tests/Test/MooseX/MethodPrivate.pm
deleted file mode 100644
index cb8dc4c..0000000
--- a/xt/tests/Test/MooseX/MethodPrivate.pm
+++ /dev/null
@@ -1,25 +0,0 @@
-package Test::MooseX::MethodPrivate;
-
-use strict;
-use warnings;
-use base 'Test::Class';
-use Test::Exception;
-use Test::More;
-
-sub class { 'MooseX::MethodPrivate' }
-
-sub startup : Tests(startup => 1) {
- my $test = shift;
- use_ok $test->class, "use ok";
-}
-
-sub shutdown : Tests(shutdown) {
- my $test = shift;
-}
-
-sub constructor : Tests(1) {
- my $test = shift;
- can_ok $test->class, 'new';
-}
-
-1;