X-Git-Url: http://winboard.nl/cgi-bin?a=blobdiff_plain;f=texi2man;h=9c345f61dd8eaf6c5fb45cc90bb133227609608a;hb=76d2f540a0bc0a54bbb2aba5e29d5412e7f2191c;hp=b6bf05248fa8729aa7fe2c3c63e44fe4896b6e83;hpb=22411ae495bd9ee4c9dc5518d2bd628b7b67c8e5;p=xboard.git diff --git a/texi2man b/texi2man index b6bf052..9c345f6 100755 --- a/texi2man +++ b/texi2man @@ -1,5 +1,4 @@ #!/usr/bin/perl -# $Id$ # Written by Adrian Mariano, additional features by Eric Backus, # yet more features by Tim Mann. @@ -169,7 +168,8 @@ sub parse } if (/\@include (.*)/) { - open(my $INCL, $1) or open($INCL, "../$1") or die "$1: $!"; + my $INCL; + open($INCL, $1) or open($INCL, "../$1") or die "$1: $!"; while (<$INCL>) { parse(); }