Sync with libnet-1.12

[perl5.git] / lib / Net / protoent.t

diff --git a/lib/Net/protoent.t b/lib/Net/protoent.t
index 6c5a154..0c31601 100644 (file)
--- a/lib/Net/protoent.t
+++ b/lib/Net/protoent.t
@@ -8,7 +8,7 @@ BEGIN {
 BEGIN {
     our $haspe;
     eval { my @n = getprotobyname "tcp" };
-    $haspe = 1 unless $@ && $@ =~ /unimplemented/;
+    $haspe = 1 unless $@ && $@ =~ /unimplemented|unsupported/i;
     unless ($haspe) { print "1..0 # Skip: no getprotobyname\n"; exit 0 }
     use Config;
     $haspe = 0 unless $Config{'i_netdb'} eq 'define';