Don't use 'parent' in util/dofile.pl

[openssl.git] / util / dofile.pl

diff --git a/util/dofile.pl b/util/dofile.pl
index 76dfe2b607f44f011c0a490a1554a6b8c2c07f99..78b8dfed9d4ac8bd16ffff53e7df9a585bdb3e2f 100644 (file)
--- a/util/dofile.pl
+++ b/util/dofile.pl
@@ -35,7 +35,9 @@ use File::Spec::Functions;
 use lib catdir(dirname(__FILE__));
 use with_fallback qw(Text::Template);
 
-use parent qw/Text::Template/;
+#use parent qw/Text::Template/;
+use vars qw/@ISA/;
+push @ISA, qw/Text::Template/;
 
 # Override constructor
 sub new {