diff options
Diffstat (limited to 'gnu/usr.bin/perl/cpan/podlators/t/man')
-rw-r--r-- | gnu/usr.bin/perl/cpan/podlators/t/man/devise-date.t | 6 | ||||
-rw-r--r-- | gnu/usr.bin/perl/cpan/podlators/t/man/devise-title.t | 4 | ||||
-rw-r--r-- | gnu/usr.bin/perl/cpan/podlators/t/man/empty.t | 4 | ||||
-rw-r--r-- | gnu/usr.bin/perl/cpan/podlators/t/man/heading.t | 4 | ||||
-rw-r--r-- | gnu/usr.bin/perl/cpan/podlators/t/man/no-encode.t | 13 | ||||
-rw-r--r-- | gnu/usr.bin/perl/cpan/podlators/t/man/utf8-io.t | 17 |
6 files changed, 21 insertions, 27 deletions
diff --git a/gnu/usr.bin/perl/cpan/podlators/t/man/devise-date.t b/gnu/usr.bin/perl/cpan/podlators/t/man/devise-date.t index 129721323c6..4729e0bf0f5 100644 --- a/gnu/usr.bin/perl/cpan/podlators/t/man/devise-date.t +++ b/gnu/usr.bin/perl/cpan/podlators/t/man/devise-date.t @@ -3,16 +3,16 @@ # In order for MakeMaker to build in the core, nothing can use Fcntl which # includes POSIX. devise_date()'s use of strftime() was replaced. This tests # that it's identical. It also tests special handling of the POD_MAN_DATE -# environment variable. +# and SOURCE_DATE_EPOCH environment variables. # -# Copyright 2009, 2014-2015, 2018 Russ Allbery <rra@cpan.org> +# Copyright 2009, 2014-2015, 2018-2019 Russ Allbery <rra@cpan.org> # # This program is free software; you may redistribute it and/or modify it # under the same terms as Perl itself. # # SPDX-License-Identifier: GPL-1.0-or-later OR Artistic-1.0-Perl -use 5.006; +use 5.008; use strict; use warnings; diff --git a/gnu/usr.bin/perl/cpan/podlators/t/man/devise-title.t b/gnu/usr.bin/perl/cpan/podlators/t/man/devise-title.t index a7e5e7b89d2..b2e82468b47 100644 --- a/gnu/usr.bin/perl/cpan/podlators/t/man/devise-title.t +++ b/gnu/usr.bin/perl/cpan/podlators/t/man/devise-title.t @@ -3,14 +3,14 @@ # Tests for the automatic determination of the manual page title if not # specified via options to pod2man or the Pod::Man constructor. # -# Copyright 2015-2016, 2018 Russ Allbery <rra@cpan.org> +# Copyright 2015-2016, 2018-2019 Russ Allbery <rra@cpan.org> # # This program is free software; you may redistribute it and/or modify it # under the same terms as Perl itself. # # SPDX-License-Identifier: GPL-1.0-or-later OR Artistic-1.0-Perl -use 5.006; +use 5.008; use strict; use warnings; diff --git a/gnu/usr.bin/perl/cpan/podlators/t/man/empty.t b/gnu/usr.bin/perl/cpan/podlators/t/man/empty.t index 4924fc8466a..cd0cfccc37d 100644 --- a/gnu/usr.bin/perl/cpan/podlators/t/man/empty.t +++ b/gnu/usr.bin/perl/cpan/podlators/t/man/empty.t @@ -2,14 +2,14 @@ # # Test Pod::Man with a document that produces only errors. # -# Copyright 2013, 2016, 2018 Russ Allbery <rra@cpan.org> +# Copyright 2013, 2016, 2018-2019 Russ Allbery <rra@cpan.org> # # This program is free software; you may redistribute it and/or modify it # under the same terms as Perl itself. # # SPDX-License-Identifier: GPL-1.0-or-later OR Artistic-1.0-Perl -use 5.006; +use 5.008; use strict; use warnings; diff --git a/gnu/usr.bin/perl/cpan/podlators/t/man/heading.t b/gnu/usr.bin/perl/cpan/podlators/t/man/heading.t index 9691446b6f6..f8964025e3f 100644 --- a/gnu/usr.bin/perl/cpan/podlators/t/man/heading.t +++ b/gnu/usr.bin/perl/cpan/podlators/t/man/heading.t @@ -2,7 +2,7 @@ # # Additional tests for Pod::Man heading generation. # -# Copyright 2002, 2004, 2006, 2008-2009, 2012, 2015, 2018 +# Copyright 2002, 2004, 2006, 2008-2009, 2012, 2015, 2018-2019 # Russ Allbery <rra@cpan.org> # # This program is free software; you may redistribute it and/or modify it @@ -10,7 +10,7 @@ # # SPDX-License-Identifier: GPL-1.0-or-later OR Artistic-1.0-Perl -use 5.006; +use 5.008; use strict; use warnings; diff --git a/gnu/usr.bin/perl/cpan/podlators/t/man/no-encode.t b/gnu/usr.bin/perl/cpan/podlators/t/man/no-encode.t index 15522a5d96a..199016217d2 100644 --- a/gnu/usr.bin/perl/cpan/podlators/t/man/no-encode.t +++ b/gnu/usr.bin/perl/cpan/podlators/t/man/no-encode.t @@ -3,22 +3,25 @@ # Test for graceful degradation to non-utf8 output without Encode module. # # Copyright 2016 Niko Tyni <ntyni@iki.fi> -# Copyright 2016, 2018 Russ Allbery <rra@cpan.org> +# Copyright 2016, 2018-2019 Russ Allbery <rra@cpan.org> # # This program is free software; you may redistribute it and/or modify it # under the same terms as Perl itself. # # SPDX-License-Identifier: GPL-1.0-or-later OR Artistic-1.0-Perl -use 5.006; +use 5.008; use strict; use warnings; -use Test::More tests => 6; +use Test::More tests => 5; -# Force the Encode module to be impossible to import. +# Remove the record of the Encode module being loaded if it already was (it +# may have been loaded before the test suite runs), and then make it +# impossible to load it. This should be enough to trigger the fallback code +# in Pod::Man. BEGIN { - ok(!$INC{'Encode.pm'}, 'Encode is not loaded yet'); + delete $INC{'Encode.pm'}; my $reject_encode = sub { if ($_[1] eq 'Encode.pm') { die "refusing to load Encode\n"; diff --git a/gnu/usr.bin/perl/cpan/podlators/t/man/utf8-io.t b/gnu/usr.bin/perl/cpan/podlators/t/man/utf8-io.t index d1c950076b3..76e21b98f04 100644 --- a/gnu/usr.bin/perl/cpan/podlators/t/man/utf8-io.t +++ b/gnu/usr.bin/perl/cpan/podlators/t/man/utf8-io.t @@ -1,8 +1,8 @@ -#!/usr/bin/perl -w +#!/usr/bin/perl # # Test Pod::Man UTF-8 handling, with and without PerlIO. # -# Copyright 2002, 2004, 2006, 2008-2010, 2012, 2014-2015, 2018 +# Copyright 2002, 2004, 2006, 2008-2010, 2012, 2014-2015, 2018-2020 # Russ Allbery <rra@cpan.org> # # This program is free software; you may redistribute it and/or modify it @@ -10,24 +10,15 @@ # # SPDX-License-Identifier: GPL-1.0-or-later OR Artistic-1.0-Perl -use 5.006; +use 5.008; use strict; use warnings; use lib 't/lib'; -use Test::More; +use Test::More tests => 13; use Test::Podlators qw(test_snippet_with_io); -# UTF-8 support requires Perl 5.8 or later. -BEGIN { - if ($] < 5.008) { - plan skip_all => 'Perl 5.8 required for UTF-8 support'; - } else { - plan tests => 13; - } -} - # Load the module. BEGIN { use_ok('Pod::Man'); |