diff options
author | Tomasz Konojacki <me@xenu.pl> | 2020-04-03 21:45:13 +0200 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2020-04-03 13:55:26 -0600 |
commit | e584d91137bdc3c46182e30c4d07c15765b6e17a (patch) | |
tree | 82cb635435702051fd6c5e98d6a66fe3084b0d65 /dist/IO/t | |
parent | fc204a7a99f305920abec395f87fcd1c1ac37905 (diff) | |
download | perl-e584d91137bdc3c46182e30c4d07c15765b6e17a.tar.gz |
DragonFly BSD doesn't support SO_PROTOCOL for AF_UNIX sockets
Diffstat (limited to 'dist/IO/t')
-rw-r--r-- | dist/IO/t/cachepropagate-unix.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/dist/IO/t/cachepropagate-unix.t b/dist/IO/t/cachepropagate-unix.t index cd32392eb1..7a1ff85653 100644 --- a/dist/IO/t/cachepropagate-unix.t +++ b/dist/IO/t/cachepropagate-unix.t @@ -50,7 +50,7 @@ my $p = $listener->protocol(); # This is a TODO instead of a skip so if these ever implement SO_PROTOCOL # we'll be notified about the passing TODO so the test can be updated. local $TODO = "$^O doesn't support SO_PROTOCOL on AF_UNIX" - if $^O =~ /^(netbsd|darwin|cygwin|hpux|solaris)$/; + if $^O =~ /^(netbsd|darwin|cygwin|hpux|solaris|dragonfly)$/; ok(defined($p), 'protocol defined'); } my $d = $listener->sockdomain(); @@ -105,7 +105,7 @@ SKIP: { { # see comment above local $TODO = "$^O doesn't support SO_PROTOCOL on AF_UNIX" - if $^O =~ /^(netbsd|darwin|cygwin|hpux|solaris)$/; + if $^O =~ /^(netbsd|darwin|cygwin|hpux|solaris|dragonfly)$/; ok(defined($p), 'protocol defined'); } $d = $listener->sockdomain(); |