Get rid of legacy inheritance

libwww-perl · Mar 11, 2024 · c84f9c8 · c84f9c8
1 parent 3e233b5
commit c84f9c8
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lib/LWP/Protocol/https.pm b/lib/LWP/Protocol/https.pm
@@ -5,7 +5,7 @@ use warnings;
 
 our $VERSION = '6.14';
 
-use base qw(LWP::Protocol::http);
+use parent qw(LWP::Protocol::http);
 require Net::HTTPS;
 
 sub socket_type
@@ -112,7 +112,7 @@ if ( $Net::HTTPS::SSL_SOCKET_CLASS->can('start_SSL')) {
 #-----------------------------------------------------------
 package LWP::Protocol::https::Socket;
 
-use base qw(Net::HTTPS LWP::Protocol::http::SocketMethods);
+use parent -norequire, qw(Net::HTTPS LWP::Protocol::http::SocketMethods);
 
 1;