Mailing List Archive

svn commit: r1903420 - /spamassassin/trunk/t/perlcritic.t
Author: sidney
Date: Mon Aug 15 05:06:36 2022
New Revision: 1903420

URL: http://svn.apache.org/viewvc?rev=1903420&view=rev
Log:
More complete fix for taint than in previous commit, using the code already in sa_t_init()

Modified:
spamassassin/trunk/t/perlcritic.t

Modified: spamassassin/trunk/t/perlcritic.t
URL: http://svn.apache.org/viewvc/spamassassin/trunk/t/perlcritic.t?rev=1903420&r1=1903419&r2=1903420&view=diff
==============================================================================
--- spamassassin/trunk/t/perlcritic.t (original)
+++ spamassassin/trunk/t/perlcritic.t Mon Aug 15 05:06:36 2022
@@ -1,7 +1,14 @@
#!/usr/bin/perl -T
# Wrapper around test until perlcritic fixes bug running under -T
-$ENV{'ENV'} = undef;
-$ENV{'PATH'} = '/bin:/usr/bin';
+
+# sa_t_init handles a number of necessary cross-platform initialization that is necessary
+# even though this wrapper doesn't need most things that are also in there
+use lib '.'; use lib 't';
+use SATest; sa_t_init('perlcritic');
+
+use strict;
+use warnings;
+
-d "t" && "$^X t/perlcritic.pl" =~ /(.*)/ ||
"$^X perlcritic.pl" =~ /(.*)/;
exec($1);