diff options
author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2011-07-04 22:16:40 +0100 |
---|---|---|
committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2011-07-04 23:43:17 +0100 |
commit | d9c6e45dfbbd7f7c7a69cd9de94ea898cc3218b6 (patch) | |
tree | 48777f064273d8dfc6ff9d855d1cec83fb989fab /Porting | |
parent | bafdc25d6fdf3143c875c3440a49861ff1e19000 (diff) | |
download | perl-d9c6e45dfbbd7f7c7a69cd9de94ea898cc3218b6.tar.gz |
Additional heuristics to catch edge-cases in corelist.pl
Addresses [rt.cpan #69108] reported by Dee Newcum
Diffstat (limited to 'Porting')
-rwxr-xr-x | Porting/corelist.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Porting/corelist.pl b/Porting/corelist.pl index a2b7c1e81a..fda9a5e91a 100755 --- a/Porting/corelist.pl +++ b/Porting/corelist.pl @@ -96,7 +96,9 @@ find( $module =~ s{^Encode/encoding}{encoding}, $module =~ s{^IPC-SysV/}{IPC/}, $module =~ s{^MIME-Base64/QuotedPrint}{MIME/QuotedPrint}, - $module =~ s{^(?:DynaLoader|Errno|Opcode)/}{}, + $module =~ s{^(?:DynaLoader|Errno|Opcode|XSLoader)/}{}, + $module =~ s{^Sys-Syslog/win32}{Sys-Syslog}, + $module =~ s{^Time-Piece/Seconds}{Time/Seconds}, ); $module =~ s{^vms/ext}{VMS}; $module =~ s{^lib/}{}g; |