From a041cdc9197695fc54129ef1af1e73abf632bb38 Mon Sep 17 00:00:00 2001 From: drow Date: Wed, 31 May 2006 15:48:05 +0000 Subject: [PATCH] * texi2pod.pl: Correct handling of absolute @include. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@114271 138bc75d-0d04-0410-961f-82ee72b054a4 --- contrib/ChangeLog | 4 ++++ contrib/texi2pod.pl | 6 ++++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/contrib/ChangeLog b/contrib/ChangeLog index 1583757d1fb..46731357181 100644 --- a/contrib/ChangeLog +++ b/contrib/ChangeLog @@ -1,3 +1,7 @@ +2006-05-31 Daniel Jacobowitz + + * texi2pod.pl: Correct handling of absolute @include. + 2006-05-02 Daniel Jacobowitz * texi2pod.pl: Handle -I. diff --git a/contrib/texi2pod.pl b/contrib/texi2pod.pl index 57d1d5bcd63..ed0d102a1a5 100755 --- a/contrib/texi2pod.pl +++ b/contrib/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; -- 2.11.4.GIT