about summary refs log tree commit homepage
path: root/t
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2020-12-31 13:51:50 +0000
committerEric Wong <e@80x24.org>2021-01-01 05:00:40 +0000
commit52df89ced31a5685d37e17c62ccccd3db5aa3e62 (patch)
tree3b36d49255b646c1a7c80159db279e20c51979b3 /t
parentd59a9cb667f106b29363795539b55116077bcd80 (diff)
downloadpublic-inbox-52df89ced31a5685d37e17c62ccccd3db5aa3e62.tar.gz
Since Perl exposes O_NONBLOCK as a constant, we can safely make
SFD_NONBLOCK a constant, too.  This is not the case for
SFD_CLOEXEC, since O_CLOEXEC is not exposed by Perl despite
being used internally in the interpreter.
Diffstat (limited to 't')
-rw-r--r--t/sigfd.t6
1 files changed, 3 insertions, 3 deletions
diff --git a/t/sigfd.t b/t/sigfd.t
index 8daf3137..07120b64 100644
--- a/t/sigfd.t
+++ b/t/sigfd.t
@@ -4,7 +4,7 @@ use Test::More;
 use IO::Handle;
 use POSIX qw(:signal_h);
 use Errno qw(ENOSYS);
-use PublicInbox::Syscall qw($SFD_NONBLOCK);
+use PublicInbox::Syscall qw(SFD_NONBLOCK);
 require_ok 'PublicInbox::Sigfd';
 
 SKIP: {
@@ -42,8 +42,8 @@ SKIP: {
                 }
                 $sigfd = undef;
 
-                my $nbsig = PublicInbox::Sigfd->new($sig, $SFD_NONBLOCK);
-                ok($nbsig, 'Sigfd->new $SFD_NONBLOCK works');
+                my $nbsig = PublicInbox::Sigfd->new($sig, SFD_NONBLOCK);
+                ok($nbsig, 'Sigfd->new SFD_NONBLOCK works');
                 is($nbsig->wait_once, undef, 'nonblocking ->wait_once');
                 ok($! == Errno::EAGAIN, 'got EAGAIN');
                 kill('HUP', $$) or die "kill $!";