diff options
author | Daniel Jacobowitz <drow@false.org> | 2006-05-31 19:52:11 +0400 |
---|---|---|
committer | Daniel Jacobowitz <drow@false.org> | 2006-05-31 19:52:11 +0400 |
commit | ed8b60964bfd5ef31d3bde5e8fcbcb4fa8e08bf1 (patch) | |
tree | e6264ec4e5a2993e5377708b71262cf33b3fc9c0 /etc/texi2pod.pl | |
parent | a41ff81fd6eb8ae51d9780c64cbb5a9e87301f61 (diff) |
* texi2pod.pl: Correct handling of absolute @include.insight_6_5-20061003-releasegdb_6_5-20060621-releasegdb_6_5-branch
Diffstat (limited to 'etc/texi2pod.pl')
-rw-r--r-- | etc/texi2pod.pl | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/etc/texi2pod.pl b/etc/texi2pod.pl index 57d1d5bcd..ed0d102a1 100644 --- a/etc/texi2pod.pl +++ b/etc/texi2pod.pl @@ -239,8 +239,10 @@ while(<$inf>) { # Try cwd and $ibase, then explicit -I paths. $done = 0; - foreach $path (".", $ibase, @ipath) { - open($inf, "<" . $path . "/" . $file) and ($done = 1, last); + foreach $path ("", $ibase, @ipath) { + $mypath = $file; + $mypath = $path . "/" . $mypath if ($path ne ""); + open($inf, "<" . $mypath) and ($done = 1, last); } die "cannot find $file" if !$done; next; |