diff options
Diffstat (limited to 'tests/perl/module-version-t')
| -rwxr-xr-x | tests/perl/module-version-t | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/tests/perl/module-version-t b/tests/perl/module-version-t index 878cc2d..31ee988 100755 --- a/tests/perl/module-version-t +++ b/tests/perl/module-version-t @@ -12,7 +12,7 @@ # # SPDX-License-Identifier: MIT -use 5.006; +use 5.008; use strict; use warnings; @@ -27,11 +27,13 @@ BEGIN { } } -use Getopt::Long qw(GetOptions); use Test::RRA qw(skip_unless_automated); use Test::RRA::Automake qw(automake_setup); use Test::RRA::ModuleVersion qw(test_module_versions update_module_versions); +use Cwd qw(getcwd); +use Getopt::Long qw(GetOptions); + # Return the current version and, optionally, the package name from the NEWS # file. Munges the version to be appropriate for Perl if necessary. # @@ -85,9 +87,9 @@ if (!$update) { # Get the package name and version. my ($version, $package) = news_version(); -# rra-c-util itself checks the versions of the testing support modules instead -# of an embedded tree of Perl modules. -my $root = ($package eq 'rra-c-util') ? 'tests/tap/perl' : 'perl/lib'; +# rra-c-util, but only it, also checks the versions of all the testing support +# modules. +my $root = ($package eq 'rra-c-util') ? getcwd() : 'perl/lib'; # Main routine. We run as either a test suite or as a script to update all of # the module versions, selecting based on whether we got the -u / --update @@ -114,7 +116,7 @@ B<module-version-t> [B<--update>] =head1 REQUIREMENTS -Perl 5.6.2 or later. +Perl 5.8 or later. =head1 DESCRIPTION @@ -155,7 +157,7 @@ Russ Allbery <eagle@eyrie.org> =head1 COPYRIGHT AND LICENSE -Copyright 2014, 2016 Russ Allbery <eagle@eyrie.org> +Copyright 2014, 2016, 2019-2020 Russ Allbery <eagle@eyrie.org> Copyright 2013 The Board of Trustees of the Leland Stanford Junior University |