perl-sys/perl-sys.patch@085c98460a58 (annotated)
perl-sys/perl-sys.patch
Thu, 02 Aug 2012 00:01:34 +0200
- author
- Michael Schloh von Bennewitz <michael@schloh.com>
- date
- Thu, 02 Aug 2012 00:01:34 +0200
- changeset 439
- 085c98460a58
- parent 57
- b2ef87c65d24
- permissions
- -rw-r--r--
Use upstream man pages to avoid local help2man failures, likely due to
shell capability assumptions or cross platform environment variance.
The upstream man pages are probably better formatted anyway.
| michael@372 | 1 | Index: IPC-ShareLite-0.17/Makefile.PL |
| michael@372 | 2 | --- IPC-ShareLite-0.17/Makefile.PL.orig 2011-06-19 23:39:44.000000000 +0200 |
| michael@372 | 3 | +++ IPC-ShareLite-0.17/Makefile.PL 2011-06-19 23:52:49.000000000 +0200 |
| michael@372 | 4 | @@ -55,11 +55,10 @@ |
| michael@57 | 5 | |
| michael@372 | 6 | my @exclude = qw( Devel::CheckLib IO::CaptureOutput ); |
| michael@372 | 7 | my $pad = ' ' x 4; |
| michael@372 | 8 | - die "Can't parse Makefile fragment" |
| michael@372 | 9 | - unless $lines[-2] =~ /^([^"']*(["'])).*?(\2[^"']*)$/; |
| michael@372 | 10 | splice @lines, -1, 0, map { "$1$_$3" } ( |
| michael@372 | 11 | 'no_index:', "${pad}package:", map { "${pad}${pad}- $_" } @exclude |
| michael@372 | 12 | ); |
| michael@57 | 13 | |
| michael@372 | 14 | return join "\n", @lines; |
| michael@372 | 15 | } |
| michael@372 | 16 | + |
