dev-perl/File-Rename: fix tests

Package-Manager: Portage-3.0.18, Repoman-3.0.3
Signed-off-by: Alfred Wingate <parona@protonmail.com>
This commit is contained in:
Alfred Wingate 2021-06-01 12:19:34 +03:00
parent f4bc021e7f
commit 1820c31ff7
No known key found for this signature in database
GPG Key ID: A12750536B5E7010

View File

@ -9,7 +9,6 @@ inherit perl-module
DESCRIPTION="Perl extension for renaming multiple files" DESCRIPTION="Perl extension for renaming multiple files"
SLOT="0" SLOT="0"
KEYWORDS="~amd64" KEYWORDS="~amd64"
# No virtuals for # No virtuals for
# Pod::Usage # Pod::Usage
# File::Basename # File::Basename
@ -40,5 +39,8 @@ src_prepare() {
-e '/\=head1 DESCRIPTION/,/C<rename>/ s/C<rename>/C<prename>/' \ -e '/\=head1 DESCRIPTION/,/C<rename>/ s/C<rename>/C<prename>/' \
-e '/\=head2 Examples/,/\=head1 OPTIONS/ s/\(^\s\)rename/\1prename/' \ -e '/\=head2 Examples/,/\=head1 OPTIONS/ s/\(^\s\)rename/\1prename/' \
rename.PL || die rename.PL || die
# Also modify tests so that they work with the above changes
sed -i '/sub script_name/,/;/ s/\([^-]\)rename/\1prename/' t/testlib.pl || die
sed -i "s/my \$generic = 'rename';/my \$generic = 'prename';/" t/rename-examples.t || die
default default
} }