You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
36 lines
1.2 KiB
36 lines
1.2 KiB
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; |
|
} |
|
+
|
|
|