This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Teach Porting/cmpVERSION.pl about Scalar-List-Utils (broken by cb8c84586a)
authorSteve Hay <steve.m.hay@googlemail.com>
Wed, 17 Sep 2014 07:24:56 +0000 (08:24 +0100)
committerSteve Hay <steve.m.hay@googlemail.com>
Wed, 17 Sep 2014 07:24:56 +0000 (08:24 +0100)
Porting/cmpVERSION.pl

index c92fe78..0123f29 100755 (executable)
@@ -120,6 +120,7 @@ sub pm_file_from_xs {
                         # look for a .pm in lib/ based on that:
                         my ($path) = shift =~ m!^(.*)/!;
                         my ($last) = $path =~ m!([^/]+)\z!;
+                        $last = 'List-Util' if $last eq 'Scalar-List-Utils';
                         $last =~ tr !-!/!;
                         return "$path/lib/$last";
                     }) {