From: Frédéric Buclin <LpSolit@gmail.com>
Date: Mon, 16 Mar 2015 17:15:08 +0000 (+0100)
Subject: Bug 1137669: 003safesys.t doesn't test any file due to a missing -T argument (and... 
X-Git-Tag: release-5.1.1~326
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=694d136a06065dbba82b98fe71b432b342c6f82c;p=thirdparty%2Fbugzilla.git

Bug 1137669: 003safesys.t doesn't test any file due to a missing -T argument (and broken syntax in Support::Systemexec)
r=dylan a=glob
---

diff --git a/t/Support/Systemexec.pm b/t/Support/Systemexec.pm
index 65be229e3c..e73763f8f0 100644
--- 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;