This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Forgot few S_I* imports.
[perl5.git] / t / lib / ipc_sysv.t
index fbaf19a..500b5b6 100755 (executable)
@@ -18,7 +18,7 @@ BEGIN {
 # Later the sem* tests will import more for themselves.
 
 use IPC::SysV qw(IPC_PRIVATE IPC_NOWAIT IPC_STAT IPC_RMID
-                S_IRWXU S_IRWXG S_IRWXO);
+                S_IRWXU S_IRWXG S_IRWXO S_IWGRP S_IROTH S_IWOTH);
 use strict;
 
 print "1..16\n";