File change-command-name.patch of Package perl-File-Rename

Name the command `file-rename` so as not to conflict with the command provided by `util-linux`.

This is not only the upstream's choice of an alternative name, but also makes us compatible with Debian
(see https://salsa.debian.org/perl-team/modules/packages/rename/-/blob/master/debian/rules )

diff --git a/Build.PL b/Build.PL
index 8912e96..7692ec4 100644
--- a/Build.PL
+++ b/Build.PL
@@ -1,9 +1,7 @@
 use strict;
 use Module::Build;
 use File::Spec;
-my $script = File::Spec->catfile( 'script',
-		Module::Build->os_type eq 'Windows'  
-			? 'file-rename' : 'rename' );
+my $script = File::Spec->catfile( 'script', 'file-rename' );
 
 Module::Build -> new (
 	license		=> 'perl',	
diff --git a/t/testlib.pl b/t/testlib.pl
index 34dcb64..fa5256a 100644
--- a/t/testlib.pl
+++ b/t/testlib.pl
@@ -130,7 +130,7 @@ sub is_windows {
 } 
 
 sub script_name {
-    return +(is_windows() ? 'file-rename' : 'rename');
+    return +('file-rename');
 }
 
 1;
openSUSE Build Service is sponsored by