Author: jkeenan
Date: Sun Aug 10 12:46:06 2008
New Revision: 30158
Modified:
branches/stepdescription/lib/Parrot/Configure.pm
branches/stepdescription/t/configure/004-configure.t
branches/stepdescription/t/configure/017-revision_from_cache.t
branches/stepdescription/t/configure/018-revision_to_cache.t
branches/stepdescription/t/configure/046-inter.t
branches/stepdescription/t/configure/047-inter.t
branches/stepdescription/t/configure/054-fatal_step.t
branches/stepdescription/t/configure/055-verbose_step.t
branches/stepdescription/t/configure/061-revision_from_cache.t
Log:
Make file pass linelength and/or trailingspace coding standards tests.
Modified: branches/stepdescription/lib/Parrot/Configure.pm
==============================================================================
--- branches/stepdescription/lib/Parrot/Configure.pm (original)
+++ branches/stepdescription/lib/Parrot/Configure.pm Sun Aug 10 12:46:06 2008
@@ -392,9 +392,9 @@
}
my $stub = qq{$step_name - };
- my $message = $stub .
- (q{ } x (22 - length($stub))) .
- $step->description .
+ my $message = $stub .
+ (q{ } x (22 - length($stub))) .
+ $step->description .
'...';
my $length_message = length($message);
unless ($args->{silent}) {
Modified: branches/stepdescription/t/configure/004-configure.t
==============================================================================
--- branches/stepdescription/t/configure/004-configure.t (original)
+++ branches/stepdescription/t/configure/004-configure.t Sun Aug 10
12:46:06 2008
@@ -91,7 +91,7 @@
like(
$@,
qr/You cannot use --step until you have completed the full configure
process/,
-"Got expected error message when using --step option and slurp() without prior
completed configuration"
+"Got expected error message for --step option and slurp() without prior
configuration"
);
}
@@ -109,7 +109,7 @@
like(
$@,
qr/You cannot use --step until you have completed the full configure
process/,
-"Got expected error message when using --step option and slurp_temp() without
prior completed configuration"
+"Got expected error message for --step option and slurp_temp() without prior
configuration"
);
}
Modified: branches/stepdescription/t/configure/017-revision_from_cache.t
==============================================================================
--- branches/stepdescription/t/configure/017-revision_from_cache.t
(original)
+++ branches/stepdescription/t/configure/017-revision_from_cache.t Sun Aug
10 12:46:06 2008
@@ -7,7 +7,8 @@
use warnings;
use Test::More;
-plan( skip_all => "\nRelevant only when working in checkout from repository
and during configuration" )
+plan( skip_all =>
+ "\nRelevant only when working in checkout from repository and during
configuration" )
unless (-e 'DEVELOPING' and ! -e 'Makefile');
plan( tests => 7 );
use Carp;
Modified: branches/stepdescription/t/configure/018-revision_to_cache.t
==============================================================================
--- branches/stepdescription/t/configure/018-revision_to_cache.t
(original)
+++ branches/stepdescription/t/configure/018-revision_to_cache.t Sun Aug
10 12:46:06 2008
@@ -7,7 +7,8 @@
use warnings;
use Test::More;
-plan( skip_all => "\nRelevant only when working in checkout from repository
and during configuration" )
+plan( skip_all =>
+ "\nRelevant only when working in checkout from repository and during
configuration" )
unless (-e 'DEVELOPING' and ! -e 'Makefile');
plan( tests => 8 );
use Carp;
Modified: branches/stepdescription/t/configure/046-inter.t
==============================================================================
--- branches/stepdescription/t/configure/046-inter.t (original)
+++ branches/stepdescription/t/configure/046-inter.t Sun Aug 10 12:46:06 2008
@@ -66,8 +66,7 @@
=head1 NAME
-046-inter.t - test Parrot::Configure::_run_this_step() with regard to
configuration steps that prompt for user input
-
+046-inter.t - test Parrot::Configure::_run_this_step()
=head1 SYNOPSIS
% prove t/configure/046-inter.t
@@ -76,6 +75,9 @@
The files in this directory test functionality used by F<Configure.pl>.
+This file tests Parrot::Configure::_run_this_step() with regard to
+configuration steps that prompt for user input.
+
=head1 AUTHOR
James E Keenan
Modified: branches/stepdescription/t/configure/047-inter.t
==============================================================================
--- branches/stepdescription/t/configure/047-inter.t (original)
+++ branches/stepdescription/t/configure/047-inter.t Sun Aug 10 12:46:06 2008
@@ -72,8 +72,7 @@
=head1 NAME
-047-inter.t - test Parrot::Configure::_run_this_step() with regard to
configuration steps that prompt for user input
-
+047-inter.t - test Parrot::Configure::_run_this_step()
=head1 SYNOPSIS
% prove t/configure/047-inter.t
@@ -82,6 +81,10 @@
The files in this directory test functionality used by F<Configure.pl>.
+This file tests Parrot::Configure::_run_this_step() with regard to
+configuration steps that prompt for user input.
+
+
=head1 AUTHOR
James E Keenan
Modified: branches/stepdescription/t/configure/054-fatal_step.t
==============================================================================
--- branches/stepdescription/t/configure/054-fatal_step.t (original)
+++ branches/stepdescription/t/configure/054-fatal_step.t Sun Aug 10
12:46:06 2008
@@ -74,7 +74,8 @@
The files in this directory test functionality used by F<Configure.pl>.
-The tests in this file examine what happens when a valid value is specified
for the C<--fatal-step> but a different configuration step is run.
+The tests in this file examine what happens when a valid value is specified
+for the C<--fatal-step> but a different configuration step is run.
=head1 AUTHOR
Modified: branches/stepdescription/t/configure/055-verbose_step.t
==============================================================================
--- branches/stepdescription/t/configure/055-verbose_step.t (original)
+++ branches/stepdescription/t/configure/055-verbose_step.t Sun Aug 10
12:46:06 2008
@@ -51,7 +51,7 @@
eval { $conf->runsteps(); };
like($@,
- qr/Argument to 'verbose-step' option must be comma-delimited string of
valid configuration steps/,
+ qr/Argument to 'verbose-step' option must be comma-delimited.*?steps/,
"Got expected error message for bad value to --verbose-step"
);
Modified: branches/stepdescription/t/configure/061-revision_from_cache.t
==============================================================================
--- branches/stepdescription/t/configure/061-revision_from_cache.t
(original)
+++ branches/stepdescription/t/configure/061-revision_from_cache.t Sun Aug
10 12:46:06 2008
@@ -7,7 +7,8 @@
use warnings;
use Test::More;
-plan( skip_all => "\nRelevant only when working in checkout from repository
and during configuration" )
+plan( skip_all =>
+ "\nRelevant only when working in checkout from repository and during
configuration" )
unless (-e 'DEVELOPING' and ! -e 'Makefile');
plan( tests => 25 );
use Carp;
