From: Vincent Pit Date: Thu, 29 Jul 2010 11:11:22 +0000 (+0200) Subject: Add kwalitee test X-Git-Tag: v0.02~24 X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLaTeX-TikZ.git;a=commitdiff_plain;h=1a518188ab44497b93aebd975835e3224f5dc443 Add kwalitee test --- diff --git a/MANIFEST b/MANIFEST index 807c8ab..92df2fe 100644 --- a/MANIFEST +++ b/MANIFEST @@ -50,3 +50,4 @@ t/30-functor.t t/91-pod.t t/92-pod-coverage.t t/95-portability-files.t +t/99-kwalitee.t diff --git a/t/99-kwalitee.t b/t/99-kwalitee.t new file mode 100644 index 0000000..185d4ce --- /dev/null +++ b/t/99-kwalitee.t @@ -0,0 +1,21 @@ +#!perl + +use strict; +use warnings; + +use Test::More; + +eval { require Test::Kwalitee; }; +plan(skip_all => 'Test::Kwalitee not installed') if $@; + +SKIP: { + eval { Test::Kwalitee->import(); }; + if (my $err = $@) { + 1 while chomp $err; + require Test::Builder; + my $Test = Test::Builder->new; + my $plan = $Test->has_plan; + $Test->skip_all($err) if not defined $plan or $plan eq 'no_plan'; + skip $err => $plan - $Test->current_test; + } +}