X-Git-Url: http://winboard.nl/cgi-bin?a=blobdiff_plain;f=texi2man;h=1f2e8157ac5fd08b67e6bcf54b7c46873a266251;hb=ea750683ac62717dd7346de17b5ae072622ff92a;hp=b6bf05248fa8729aa7fe2c3c63e44fe4896b6e83;hpb=22411ae495bd9ee4c9dc5518d2bd628b7b67c8e5;p=xboard.git

diff --git a/texi2man b/texi2man
index b6bf052..1f2e815 100755
--- a/texi2man
+++ b/texi2man
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id$
+# $Id: texi2man,v 1.2 2003/11/28 21:22:16 mann Exp $
 # Written by Adrian Mariano, additional features by Eric Backus,
 # yet more features by Tim Mann.
 
@@ -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();
         }