diff options
author | Richard Levitte <levitte@openssl.org> | 2016-02-21 22:43:29 +0100 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2016-02-21 23:08:16 +0100 |
commit | 180df315c789be1138ce2643583362f4b37c8809 (patch) | |
tree | bae5995396aee76583add736f04dda8035fa3814 /util/TLSProxy | |
parent | f8d9d6e48b7ce50aee32d151e5dc7253594e01ed (diff) |
Don't use 'parent' in util/dofile.pl
Because we're requiring Perl 5.10.0 and the 'parent' didn't appear
before Perl 5.10.1, we need to resort to the older parent module
declaration style, modifying @ISA.
Reviewed-by: Andy Polyakov <appro@openssl.org>
Diffstat (limited to 'util/TLSProxy')
-rw-r--r-- | util/TLSProxy/ClientHello.pm | 3 | ||||
-rw-r--r-- | util/TLSProxy/NewSessionTicket.pm | 3 | ||||
-rw-r--r-- | util/TLSProxy/ServerHello.pm | 3 | ||||
-rw-r--r-- | util/TLSProxy/ServerKeyExchange.pm | 3 |
4 files changed, 8 insertions, 4 deletions
diff --git a/util/TLSProxy/ClientHello.pm b/util/TLSProxy/ClientHello.pm index 383062842c..0586cf9a54 100644 --- a/util/TLSProxy/ClientHello.pm +++ b/util/TLSProxy/ClientHello.pm @@ -55,7 +55,8 @@ use strict; package TLSProxy::ClientHello; -use parent 'TLSProxy::Message'; +use vars '@ISA'; +push @ISA, 'TLSProxy::Message'; sub new { diff --git a/util/TLSProxy/NewSessionTicket.pm b/util/TLSProxy/NewSessionTicket.pm index 75dbf23234..4e8c713811 100644 --- a/util/TLSProxy/NewSessionTicket.pm +++ b/util/TLSProxy/NewSessionTicket.pm @@ -54,7 +54,8 @@ use strict; package TLSProxy::NewSessionTicket; -use parent 'TLSProxy::Message'; +use vars '@ISA'; +push @ISA, 'TLSProxy::Message'; sub new { diff --git a/util/TLSProxy/ServerHello.pm b/util/TLSProxy/ServerHello.pm index 7cf753508d..4798f22140 100644 --- a/util/TLSProxy/ServerHello.pm +++ b/util/TLSProxy/ServerHello.pm @@ -55,7 +55,8 @@ use strict; package TLSProxy::ServerHello; -use parent 'TLSProxy::Message'; +use vars '@ISA'; +push @ISA, 'TLSProxy::Message'; sub new { diff --git a/util/TLSProxy/ServerKeyExchange.pm b/util/TLSProxy/ServerKeyExchange.pm index b85b8addca..a3973be962 100644 --- a/util/TLSProxy/ServerKeyExchange.pm +++ b/util/TLSProxy/ServerKeyExchange.pm @@ -55,7 +55,8 @@ use strict; package TLSProxy::ServerKeyExchange; -use parent 'TLSProxy::Message'; +use vars '@ISA'; +push @ISA, 'TLSProxy::Message'; sub new { |