Net::protoent does not export 'getproto'

p4raw-id: //depot/perl@6878

diff --git a/lib/Net/protoent.pm b/lib/Net/protoent.pm
index 334af78..6aad940 100644 (file)
--- a/lib/Net/protoent.pm
+++ b/lib/Net/protoent.pm
@@ -5,7 +5,7 @@ use 5.005_64;
 our(@EXPORT, @EXPORT_OK, %EXPORT_TAGS);
 BEGIN { 
     use Exporter   ();
-    @EXPORT      = qw(getprotobyname getprotobynumber getprotoent);
+    @EXPORT      = qw(getprotobyname getprotobynumber getprotoent getproto);
     @EXPORT_OK   = qw( $p_name @p_aliases $p_proto );
     %EXPORT_TAGS = ( FIELDS => [ @EXPORT_OK, @EXPORT ] );
 }