diff options
Diffstat (limited to 'ext/Sys-Syslog/t/constants.t')
| -rw-r--r-- | ext/Sys-Syslog/t/constants.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Sys-Syslog/t/constants.t b/ext/Sys-Syslog/t/constants.t index c2002fb374..04fce81587 100644 --- a/ext/Sys-Syslog/t/constants.t +++ b/ext/Sys-Syslog/t/constants.t @@ -4,7 +4,7 @@ use File::Spec; use Test::More; # NB. For PERL_CORE to be set, taint mode must not be enabled -my $macrosall = $ENV{PERL_CORE} ? File::Spec->catfile(qw(.. ext Sys Syslog macros.all)) +my $macrosall = $ENV{PERL_CORE} ? File::Spec->catfile(qw(.. ext Sys-Syslog macros.all)) : 'macros.all'; open(MACROS, $macrosall) or plan skip_all => "can't read '$macrosall': $!"; my @names = map {chomp;$_} <MACROS>; |