Final changes for 4.2.7. Corrected the previous fix for texi2man bug

[xboard.git] / texi2man

diff --git a/texi2man b/texi2man
index b6bf052..b8fd364 100755 (executable)
--- a/texi2man
+++ b/texi2man
@@ -169,7 +169,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();
         }