Index: FileHandle-Unget-0.1628/inc/Module/Install/Bugtracker.pm --- FileHandle-Unget-0.1628/inc/Module/Install/Bugtracker.pm.orig 2015-05-03 04:36:00.000000000 +0200 +++ FileHandle-Unget-0.1628/inc/Module/Install/Bugtracker.pm 2015-05-03 14:19:46.621650757 +0200 @@ -3,7 +3,6 @@ use 5.006; use strict; use warnings; -use URI::Escape; use base qw(Module::Install::Base); our $VERSION = sprintf "%d.%02d%02d", q/0.3.0/ =~ /(\d+)/g; @@ -15,7 +14,7 @@ $self->bugtracker( sprintf 'http://rt.cpan.org/Public/Dist/Display.html?Name=%s', - uri_escape($self->name), + $self->name, ); } else { warn "can't set bugtracker if 'name' is not set\n"; Index: IPC-ShareLite-0.17/Makefile.PL --- IPC-ShareLite-0.17/Makefile.PL.orig 2009-03-09 22:22:54.000000000 +0100 +++ IPC-ShareLite-0.17/Makefile.PL 2015-05-03 14:18:51.731689393 +0200 @@ -55,11 +55,10 @@ my @exclude = qw( Devel::CheckLib IO::CaptureOutput ); my $pad = ' ' x 4; - die "Can't parse Makefile fragment" - unless $lines[-2] =~ /^([^"']*(["'])).*?(\2[^"']*)$/; splice @lines, -1, 0, map { "$1$_$3" } ( 'no_index:', "${pad}package:", map { "${pad}${pad}- $_" } @exclude ); return join "\n", @lines; } +