byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Make plugin syntax checks run with -T

Browse Source
This commit is contained in:
Ask Bjørn Hansen 2012-04-29 00:14:26 -07:00
parent dbaa9dbd6c
commit 46701716b2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
t/01-syntax.t
View File

@ -34,7 +34,7 @@ sub test_syntax {
return if ! -f $f; return if ! -f $f;
return if $skip_syntax{$f}; return if $skip_syntax{$f};
return if $f =~ /async/; # requires ParaDNS return if $f =~ /async/; # requires ParaDNS
my $r = `$this_perl -c $f 2>&1`; my $r = `$this_perl -Tc $f 2>&1`;
my $exit_code = sprintf ("%d", $CHILD_ERROR >> 8); my $exit_code = sprintf ("%d", $CHILD_ERROR >> 8);
ok( $exit_code == 0, "syntax $f"); ok( $exit_code == 0, "syntax $f");
}; };