Bug fix for 4.2.7
[xboard.git] / texi2man
index d9206ba..b6bf052 100755 (executable)
--- a/texi2man
+++ b/texi2man
@@ -169,7 +169,7 @@ sub parse
     }
 
     if (/\@include (.*)/) {
-        open(my $INCL, $1) or open(my $INCL, "../$1") or die "$1: $!";
+        open(my $INCL, $1) or open($INCL, "../$1") or die "$1: $!";
         while (<$INCL>) {
             parse();
         }