/xt/05_manifest.t
http://github.com/PerlGameDev/SDL · Perl · 32 lines · 21 code · 7 blank · 4 comment · 1 complexity · 35b937e9909f65b6c664cef9e7fe41da MD5 · raw file
- #!/usr/bin/perl
- # Test that our MANIFEST describes the distribution
- use strict;
- BEGIN {
- use English qw(-no_match_vars);
- $OUTPUT_AUTOFLUSH = 1;
- $WARNING = 1;
- }
- my @MODULES = ( 'Test::DistManifest 1.001003', );
- # Don't run tests for installs
- use Test::More;
- unless ( $ENV{AUTOMATED_TESTING} or $ENV{RELEASE_TESTING} ) {
- plan( skip_all => "Author tests not required for installation" );
- }
- # Load the testing modules
- foreach my $MODULE (@MODULES) {
- eval "use $MODULE";
- if ($EVAL_ERROR) {
- $ENV{RELEASE_TESTING}
- ? BAIL_OUT("Failed to load required release-testing module $MODULE")
- : plan( skip_all => "$MODULE not available for testing" );
- }
- }
- manifest_ok();
- sleep(2);