]> git.pld-linux.org Git - packages/perl.git/blob - perl-h2ph-includes.patch
- separate perl-Encode, version for perl-GDBM_File
[packages/perl.git] / perl-h2ph-includes.patch
1 --- perl-5.10.0/utils/h2ph.PL.orig      2007-12-18 11:47:08.000000000 +0100
2 +++ perl-5.10.0/utils/h2ph.PL   2008-02-10 14:01:47.206525485 +0100
3 @@ -717,6 +717,7 @@
4  
5      return if ($file eq "-");
6  
7 +    (my $filedir = $file) =~ s/[^\/]*$//;
8      open HEADER, $file or return;
9          while (defined($line = <HEADER>)) {
10              while (/\\$/) { # Handle continuation lines
11 @@ -726,6 +727,8 @@
12  
13              if ($line =~ /^#\s*include\s+<(.*?)>/) {
14                  push(@ARGV, $1) unless $Is_converted{$1};
15 +            } elsif ($line =~ /^#\s*include\s+\"(.*?)\"/) {
16 +                push(@ARGV, $filedir . $1) unless $Is_converted{$filedir . $1};
17              }
18          }
19      close HEADER;
This page took 0.057209 seconds and 3 git commands to generate.