Merge 33205cd into 320f4ba

Perl · Jul 17, 2021 · dd1c336 · dd1c336
2 parents 320f4ba + 33205cd
commit dd1c336
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 2 deletions.
diff --git a/dist/Net-Ping/t/501_ping_icmpv6.t b/dist/Net-Ping/t/501_ping_icmpv6.t
@@ -46,7 +46,11 @@ if (0 && !Net::Ping::_isroot()) {
 SKIP: {
   skip "icmpv6 ping requires root privileges.", 1
     if !Net::Ping::_isroot() or $^O eq 'MSWin32';
-  my $p = new Net::Ping "icmpv6";
+  my $p;
+  eval { $p = new Net::Ping "icmpv6"; };
+  if ($@) {
+    plan skip_all => "no icmpv6 on this machine $@";
+  }
   # message_type can't be used
   eval {
     $p->message_type();

diff --git a/t/porting/customized.dat b/t/porting/customized.dat
@@ -16,7 +16,7 @@ Net::Ping dist/Net-Ping/t/001_new.t 7b24e05672e22edfe3e6b5cc0277f815efe557e5
 Net::Ping dist/Net-Ping/t/010_pingecho.t 218d7a9ee5b6d03ba2544210acaf6585f8dc5503
 Net::Ping dist/Net-Ping/t/450_service.t f6578680f2872d7fc9f24dd75388d55654761875
 Net::Ping dist/Net-Ping/t/500_ping_icmp.t 3eeb60181c01b85f876bd6658644548fdf2e24d4
-Net::Ping dist/Net-Ping/t/501_ping_icmpv6.t 54373de5858f8fb7e078e4998a4b3b8dbca91783
+Net::Ping dist/Net-Ping/t/501_ping_icmpv6.t cd719bca662b054b676dd2ee6e0c73c7a5e50cf9
 Pod::Perldoc cpan/Pod-Perldoc/lib/Pod/Perldoc.pm 582be34c077c9ff44d99914724a0cc2140bcd48c
 Test::Harness cpan/Test-Harness/t/source.t aaa3939591114c0c52ecd44159218336d1f762b9
 Win32API::File cpan/Win32API-File/File.pm 8fd212857f821cb26648878b96e57f13bf21b99e