X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FNet%2Fservent.t;h=b476d12b67b7f378bb1b8d648b33334b951f49aa;hb=302c2e6b3178d72ea1114a76af5852e6680bacc8;hp=ef4a04dee8fd9c0ca375ecf6712c766220bc21d8;hpb=b695f709e8a342e35e482b0437eb6cdacdc58b6b;p=p5sagit%2Fp5-mst-13.2.git

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