avoid listing secondary/internal packages in "provides" metadata and …

…indexing in PAUSE
libwww-perl · Jul 14, 2017 · e9c1a9f · e9c1a9f
1 parent 5367928
commit e9c1a9f
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 3 deletions.
diff --git a/lib/LWP/Debug/TraceHTTP.pm b/lib/LWP/Debug/TraceHTTP.pm
@@ -11,7 +11,8 @@ package LWP::Debug::TraceHTTP;
 use strict;
 use base 'LWP::Protocol::http';
 
-package LWP::Debug::TraceHTTP::Socket;
+package # hide from PAUSE
+    LWP::Debug::TraceHTTP::Socket;
 
 use Data::Dump 1.13;
 use Data::Dump::Trace qw(autowrap mcall);

diff --git a/lib/LWP/Protocol/http.pm b/lib/LWP/Protocol/http.pm
@@ -497,7 +497,8 @@ sub request
 
 
 #-----------------------------------------------------------
-package LWP::Protocol::http::SocketMethods;
+package # hide from PAUSE
+    LWP::Protocol::http::SocketMethods;
 
 sub ping {
     my $self = shift;
@@ -510,7 +511,8 @@ sub increment_response_count {
 }
 
 #-----------------------------------------------------------
-package LWP::Protocol::http::Socket;
+package # hide from PAUSE
+    LWP::Protocol::http::Socket;
 
 use base qw(LWP::Protocol::http::SocketMethods Net::HTTP);