From 0592be96c26d5a8e6a05fc8e7985b09c09f16adc Mon Sep 17 00:00:00 2001
From: Alfred Wingate <parona@protonmail.com>
Date: Tue, 18 May 2021 19:37:21 +0300
Subject: [PATCH] dev-perl/File-Rename: bump to 1.20

Package-Manager: Portage-3.0.18, Repoman-3.0.2
Signed-off-by: Alfred Wingate <parona@protonmail.com>
---
 dev-perl/File-Rename/File-Rename-1.20.ebuild | 44 ++++++++++++++++++++
 dev-perl/File-Rename/Manifest                |  1 +
 2 files changed, 45 insertions(+)
 create mode 100644 dev-perl/File-Rename/File-Rename-1.20.ebuild

diff --git a/dev-perl/File-Rename/File-Rename-1.20.ebuild b/dev-perl/File-Rename/File-Rename-1.20.ebuild
new file mode 100644
index 0000000..ce42c1b
--- /dev/null
+++ b/dev-perl/File-Rename/File-Rename-1.20.ebuild
@@ -0,0 +1,44 @@
+# Copyright 2021 Gentoo Authors
+# Distributed under the terms of the GNU General Public License v2
+
+EAPI=7
+
+DIST_AUTHOR=RMBARKER
+inherit perl-module
+
+DESCRIPTION="Perl extension for renaming multiple files"
+SLOT="0"
+KEYWORDS="~amd64"
+
+# No virtuals for
+#   Pod::Usage
+#   File::Basename
+#   Test::More
+
+RDEPEND="
+	virtual/perl-ExtUtils-MakeMaker
+	virtual/perl-File-Spec
+	virtual/perl-Getopt-Long
+"
+BDEPEND="
+	dev-perl/Module-Build
+	virtual/perl-File-Spec
+"
+
+# There are differences between distributions on the name of this binary.
+# currently Debian derivatives call it prename while Arch derivatives call
+# it perl-rename. It can't be named "rename" as util-linux provides
+# a binary of the same name.
+
+src_prepare() {
+	# Rename script name from "rename" to "prename" to not conflict with "rename" from util-linux
+	sed -i '/my \$script/,/;/ s/\([^-]\)rename/\1prename/' Build.PL || die
+	# Modify man page to make sense with previous change to script name
+	sed -i \
+		-e '/\=head1 NAME/,/^rename/ s/^rename/prename/' \
+		-e '/\=head1 SYNOPSIS/,/B<rename>/ s/B<rename>/B<prename>/' \
+		-e '/\=head1 DESCRIPTION/,/C<rename>/ s/C<rename>/C<prename>/' \
+		-e '/\=head2 Examples/,/\=head1 OPTIONS/ s/\(^\s\)rename/\1prename/' \
+		rename.PL || die
+	default
+}
diff --git a/dev-perl/File-Rename/Manifest b/dev-perl/File-Rename/Manifest
index 3a7b219..f4fcea4 100644
--- a/dev-perl/File-Rename/Manifest
+++ b/dev-perl/File-Rename/Manifest
@@ -1 +1,2 @@
 DIST File-Rename-1.10.tar.gz 13674 BLAKE2B ef6125835660a6bad7fde0b4f59c854951e709651a0610ab02b756c9c03dae36c655104b34ebaf14fedb76ac06be670966a6c771f77656fd471d6cbfc6549712 SHA512 c40b091692fc3a53b128d8089754fafaf2e072f9b77e962617a9618639f2cb7c547a369949e4f41594d2bc9961ab99ec789c6151c5fc473e5ac160fd375ce629
+DIST File-Rename-1.20.tar.gz 15139 BLAKE2B b0ecdd0ceda467c7fe92bd218d91dc950686d79756690ced78173c87affb93547067df2fbb567b987d6b5acf9afabd56eb0930840b0add7716aeb83dcaa72f3a SHA512 3ba6bfe6f1b69c4f8e43ea7164d6c84a368f4954e29ca731bc7e59d35b59a62c82aa9d7a1a617c15d63a227ba5c73f76d1cb0939d1b393fd2c53fe8d4f441966