X-Git-Url: http://winboard.nl/cgi-bin?p=xboard.git;a=blobdiff_plain;f=texi2man;h=9c345f61dd8eaf6c5fb45cc90bb133227609608a;hp=d9206ba2b63db84b8d12f6090fe44aec8e2a90d5;hb=HEAD;hpb=9c0812e2363e05974bc6b174c2db55129aca6f08

diff --git a/texi2man b/texi2man
index d9206ba..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(my $INCL, "../$1") or die "$1: $!";
+	my $INCL;
+        open($INCL, $1) or open($INCL, "../$1") or die "$1: $!";
         while (<$INCL>) {
             parse();
         }