diff options
author | Vincent Pit <vince@profvince.com> | 2009-02-07 14:48:06 +0100 |
---|---|---|
committer | Vincent Pit <vince@profvince.com> | 2009-02-07 14:48:34 +0100 |
commit | 7fee2b4cbff01fe23cb8ddca87276ca9899b0fe3 (patch) | |
tree | b38a2bd3625c100982c31b241be03da7da9b56dc /ext | |
parent | 26f467e271edd98e360d6fde88d670d7a659f513 (diff) | |
download | perl-7fee2b4cbff01fe23cb8ddca87276ca9899b0fe3.tar.gz |
ext/Sys-Syslog/t/constants.t needs to find macros.all in the new place
Diffstat (limited to 'ext')
-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>; |