comparison: perl-sys/perl-sys.patch
perl-sys/perl-sys.patch
- changeset 622
- e35cb8425f97
- parent 57
- b2ef87c65d24
equal
deleted
inserted
replaced
| 1:4ffc2988d753 | -1:000000000000 |
|---|---|
| 1 Index: IPC-ShareLite-0.17/Makefile.PL | |
| 2 --- IPC-ShareLite-0.17/Makefile.PL.orig 2011-06-19 23:39:44.000000000 +0200 | |
| 3 +++ IPC-ShareLite-0.17/Makefile.PL 2011-06-19 23:52:49.000000000 +0200 | |
| 4 @@ -55,11 +55,10 @@ | |
| 5 | |
| 6 my @exclude = qw( Devel::CheckLib IO::CaptureOutput ); | |
| 7 my $pad = ' ' x 4; | |
| 8 - die "Can't parse Makefile fragment" | |
| 9 - unless $lines[-2] =~ /^([^"']*(["'])).*?(\2[^"']*)$/; | |
| 10 splice @lines, -1, 0, map { "$1$_$3" } ( | |
| 11 'no_index:', "${pad}package:", map { "${pad}${pad}- $_" } @exclude | |
| 12 ); | |
| 13 | |
| 14 return join "\n", @lines; | |
| 15 } | |
| 16 + |
