From 4d5d76cf87a83445d7f884393411670ead0e9a21 Mon Sep 17 00:00:00 2001
From: Alfred Wingate <parona@protonmail.com>
Date: Sun, 31 Dec 2023 12:08:12 +0200
Subject: [PATCH] dev-perl/File-Rename: add 2.02

Signed-off-by: Alfred Wingate <parona@protonmail.com>
---
 dev-perl/File-Rename/File-Rename-2.02.ebuild | 48 ++++++++++++++++++++
 dev-perl/File-Rename/Manifest                |  1 +
 2 files changed, 49 insertions(+)
 create mode 100644 dev-perl/File-Rename/File-Rename-2.02.ebuild

diff --git a/dev-perl/File-Rename/File-Rename-2.02.ebuild b/dev-perl/File-Rename/File-Rename-2.02.ebuild
new file mode 100644
index 0000000..c3af4e5
--- /dev/null
+++ b/dev-perl/File-Rename/File-Rename-2.02.ebuild
@@ -0,0 +1,48 @@
+# Copyright 2021-2023 Gentoo Authors
+# Distributed under the terms of the GNU General Public License v2
+
+EAPI=8
+
+DIST_AUTHOR=RMBARKER
+inherit perl-module
+
+DESCRIPTION="Perl extension for renaming multiple files"
+SLOT="0"
+KEYWORDS="~amd64"
+
+RDEPEND=">=virtual/perl-Getopt-Long-2.24"
+BDEPEND="
+	>=virtual/perl-ExtUtils-MakeMaker-7.36
+	test? ( ${RDEPEND} )
+"
+
+# 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() {
+	eapply_user
+
+	# Rename script name from "rename" to "prename" to not conflict with "rename" from util-linux
+	sed -i \
+		-e'/my \$script/,/;/ s/\([^-]\)rename/\1prename/' \
+		-e '/my \$unsafe/,/;/ s/\([^-]\)unsafe-rename/\1unsafe-prename/' \
+		Makefile.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/' \
+		source/rename || die
+
+	# Also modify tests so that they work with the above changes
+	sed -i \
+		-e '/sub script_name/,/;/ s/\([^-]\)rename/\1prename/' \
+		-e '/sub unsafe_script_name/,/;/ s/\([^-]\)unsafe-rename/\1unsafe-prename/' \
+		t/testlib.pl || die
+	sed -i "s/my \$generic = 'rename';/my \$generic = 'prename';/" t/rename-examples.t || die
+	sed -i "s/my \$generic = 'rename';/my \$generic = 'prename';/" t/u/rename-examples.t || die
+}
diff --git a/dev-perl/File-Rename/Manifest b/dev-perl/File-Rename/Manifest
index 4f24733..ce2c7d6 100644
--- a/dev-perl/File-Rename/Manifest
+++ b/dev-perl/File-Rename/Manifest
@@ -1 +1,2 @@
 DIST File-Rename-2.01.tar.gz 17018 BLAKE2B 6025d67570bb5196fd6177501ed03999856d9ccccfe6c27d743d2ffe20ba78dcf2208a24c62795f4ba8503fe75769763e72a8044fe924f1ae39e8cf1ee628f9f SHA512 7cbb08facf94c1246a9a1bed6baa1a0e1eface35d5baab1726596daa51b1eb4beb2bfcc75de5945d4fcd265c5119db5e1ef5b9280fc4dbbc1735e2d80d922cae
+DIST File-Rename-2.02.tar.gz 17951 BLAKE2B 76dc3d373e1d459fb02752e4059afd6a4ea5eea7a743891159e3d6ba0848e7b5c7c249f9de1b4e1189a98de1b4ce0896bed97e35d54ca53349bdf277db718f86 SHA512 01eb399659ed34c64ca37eef425c7da56649f83c863747858006f1b86f013fa916ec8e9126ba8186cbf6d21be7d04864161d34ac3b9b57e6333ebe2450d1731a