diff options
author | Daniel Jacobowitz <drow@false.org> | 2006-05-31 15:51:23 +0000 |
---|---|---|
committer | Daniel Jacobowitz <drow@false.org> | 2006-05-31 15:51:23 +0000 |
commit | d9c3b58631d44a8e7acf178cf96f6ca318765422 (patch) | |
tree | 72ffd1d0edbf7319820cebd0a55546036b794827 | |
parent | 8497eea17322cb31e55e9122a27b376015d9260b (diff) | |
download | newlib-binutils-2_17-branch.zip newlib-binutils-2_17-branch.tar.gz newlib-binutils-2_17-branch.tar.bz2 |
* texi2pod.pl: Correct handling of absolute @include.binutils-2_17github/binutils-2_17-branchbinutils-2_17-branch
-rw-r--r-- | etc/ChangeLog | 4 | ||||
-rw-r--r-- | etc/texi2pod.pl | 6 |
2 files changed, 8 insertions, 2 deletions
diff --git a/etc/ChangeLog b/etc/ChangeLog index 09d002f..a5959c7 100644 --- a/etc/ChangeLog +++ b/etc/ChangeLog @@ -1,3 +1,7 @@ +2006-05-31 Daniel Jacobowitz <dan@codesourcery.com> + + * texi2pod.pl: Correct handling of absolute @include. + 2006-05-02 Daniel Jacobowitz <dan@codesourcery.com> * texi2pod.pl: Handle -I. diff --git a/etc/texi2pod.pl b/etc/texi2pod.pl index 57d1d5b..ed0d102 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; |