diff options
author | Mark Mitchell <mark@codesourcery.com> | 2005-10-21 23:31:07 +0000 |
---|---|---|
committer | Mark Mitchell <mmitchel@gcc.gnu.org> | 2005-10-21 23:31:07 +0000 |
commit | 901097dbd4f853b85c20909dcf02e0d8e5f0cfa0 (patch) | |
tree | 479be929ee8f0beeda236122a7ee92503588e846 /contrib/texi2pod.pl | |
parent | 0e714a54f3ade6c8d21bc2187a92c40026e904e4 (diff) | |
download | gcc-901097dbd4f853b85c20909dcf02e0d8e5f0cfa0.zip gcc-901097dbd4f853b85c20909dcf02e0d8e5f0cfa0.tar.gz gcc-901097dbd4f853b85c20909dcf02e0d8e5f0cfa0.tar.bz2 |
* texi2pod.pl: Substitue for @value even when part of @include.
From-SVN: r105780
Diffstat (limited to 'contrib/texi2pod.pl')
-rwxr-xr-x | contrib/texi2pod.pl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/contrib/texi2pod.pl b/contrib/texi2pod.pl index 49953d4..9696a12 100755 --- a/contrib/texi2pod.pl +++ b/contrib/texi2pod.pl @@ -227,11 +227,12 @@ while(<$inf>) { /^\@include\s+(.+)$/ and do { push @instack, $inf; $inf = gensym(); + $file = postprocess($1); # Try cwd and $ibase. - open($inf, "<" . $1) - or open($inf, "<" . $ibase . "/" . $1) - or die "cannot open $1 or $ibase/$1: $!\n"; + open($inf, "<" . $file) + or open($inf, "<" . $ibase . "/" . $file) + or die "cannot open $file or $ibase/$file: $!\n"; next; }; |