Bug 1137669: 003safesys.t doesn't test any file due to a missing -T a…

…rgument (and broken syntax in Support::Systemexec) r=dylan a=glob
bugzilla · Mar 16, 2015 · 694d136 · 694d136
1 parent 56d130c
commit 694d136
Showing 1 changed file with 5 additions and 4 deletions.
diff --git a/t/Support/Systemexec.pm b/t/Support/Systemexec.pm
@@ -11,14 +11,15 @@ use 5.10.1;
 use strict;
 use warnings;
 
-require Exporter;
-@ISA = qw(Exporter);
-@EXPORT = qw(system exec);
-@EXPORT_OK = qw();
+use parent qw(Exporter);
+@Support::Systemexec::EXPORT = qw(system exec);
+
 sub system($$@) {
   1;
 }
+
 sub exec($$@) {
   1;
 }
+
 1;