diff options
| author | Frédéric Buclin <LpSolit@gmail.com> | 2014-08-13 12:43:11 +0200 |
|---|---|---|
| committer | Frédéric Buclin <LpSolit@gmail.com> | 2014-08-13 12:43:11 +0200 |
| commit | 9f3d18d43e3fe4e6987fb4dd09a8760560372dbf (patch) | |
| tree | bf64b06312ad9d2a4f590c414ecc28c4f8e20054 /t/001compile.t | |
| parent | c19dc4ffe98074bedb780652af581a1f0edb3b2d (diff) | |
| download | bugzilla-9f3d18d43e3fe4e6987fb4dd09a8760560372dbf.tar.gz bugzilla-9f3d18d43e3fe4e6987fb4dd09a8760560372dbf.tar.xz | |
Bug 996893: Perl 5.18 and newer throw tons of warnings about deprecated modules
r=dkl a=sgreen
Diffstat (limited to 't/001compile.t')
| -rw-r--r-- | t/001compile.t | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/t/001compile.t b/t/001compile.t index af7793093..7097ad361 100644 --- a/t/001compile.t +++ b/t/001compile.t @@ -10,8 +10,10 @@ #Bugzilla Test 1# ###Compilation### -use strict; use 5.10.1; +use strict; +use warnings; + use lib qw(. lib t); use Config; use Support::Files; @@ -52,7 +54,7 @@ sub compile_file { $libs = join " ", map { "-I\"$_\"" } split /$Config{path_sep}/, $ENV{PERL5LIB}; } my $perl = qq{"$^X"}; - my $output = `$perl $libs -wc$T $file 2>&1`; + my $output = `$perl $libs -c$T $file 2>&1`; chomp($output); my $return_val = $?; $output =~ s/^\Q$file\E syntax OK$//ms; |