Author: bernhard
Date: Mon Mar 20 13:21:27 2006
New Revision: 11953
Added:
trunk/t/distro/manifest.t
- copied, changed from r11952, /trunk/t/perl/manifest.t
Removed:
trunk/t/perl/manifest.t
Modified:
trunk/MANIFEST
trunk/t/README
trunk/t/harness
Log:
Move manifest.t from t/perl to t/distro, but still
keep it as a default test.
Modified: trunk/MANIFEST
==============================================================================
--- trunk/MANIFEST (original)
+++ trunk/MANIFEST Mon Mar 20 13:21:27 2006
@@ -2007,6 +2007,7 @@
t/configure/data.t []
t/configure/step.t []
t/distro/file_metadata.t []
+t/distro/manifest.t []
t/distro/manifest_skip.t []
t/distro/test_file_coverage.t []
t/doc/opcode-doc.t []
@@ -2089,7 +2090,6 @@
t/op/trans.t []
t/op/types.t []
t/perl/cppcomments.t []
-t/perl/manifest.t []
t/perl/Parrot_Distribution.t []
t/perl/Parrot_IO.t []
t/perl/Parrot_Test.t []
Modified: trunk/t/README
==============================================================================
--- trunk/t/README (original)
+++ trunk/t/README Mon Mar 20 13:21:27 2006
@@ -9,7 +9,7 @@
compilers: Mini languages distributed with Parrot
-configure: Configuration subsystem
+configure: Perl modules of configuration subsystem
distro: Tests run before a distro is released
Copied: trunk/t/distro/manifest.t (from r11952, /trunk/t/perl/manifest.t)
==============================================================================
--- /trunk/t/perl/manifest.t (original)
+++ trunk/t/distro/manifest.t Mon Mar 20 13:21:27 2006
@@ -1,5 +1,5 @@
#! perl
-# Copyright: 2001-2005 The Perl Foundation. All Rights Reserved.
+# Copyright: 2001-2006 The Perl Foundation. All Rights Reserved.
# $Id$
use strict;
@@ -11,20 +11,16 @@
=head1 NAME
-t/perl/manifest.t - sanity check the MANIFEST file
+t/distro/manifest.t - sanity check the MANIFEST file
=head1 SYNOPSIS
- % prove t/perl/manifest.t
+ % prove t/distro/manifest.t
=head1 DESCRIPTION
Checks that the distribution and the MANIFEST file agree.
-=head1 TODO
-
-The file make more sense in 't/distro', but still be run by 'make test'.
-
=cut
@@ -36,7 +32,6 @@
SKIP:
{
-
diag "this may take a while...";
$ExtUtils::Manifest::Quiet = 1;
Modified: trunk/t/harness
==============================================================================
--- trunk/t/harness (original)
+++ trunk/t/harness Mon Mar 20 13:21:27 2006
@@ -82,8 +82,10 @@
use strict;
use warnings;
use lib qw( . lib ../lib ../../lib );
+
use Getopt::Std;
use Test::Harness();
+use English qw( -no_match_vars );
use Parrot::Config qw/%PConfig/;
@@ -147,6 +149,9 @@
tools
perl
doc );
+# manifest.t was moved from t/perl to t/distro
+push @default_tests, 't/distro/manifest.t';
+
my @tests = @ARGV ? map { glob( $_ ) } @ARGV : @default_tests;
unless ($html) {
@@ -168,7 +173,7 @@
require Test::TAP::HTMLMatrix;
require Test::TAP::Model::Visual;
};
- die "You must have Test::TAP::HTMLMatrix installed.\n\n$@" if $@;
+ die "You must have Test::TAP::HTMLMatrix installed.\n\n$EVAL_ERROR" if
$EVAL_ERROR;
## FIXME: ###
# This is a temporary solution until Test::TAP::Model version
