From 694d136a06065dbba82b98fe71b432b342c6f82c Mon Sep 17 00:00:00 2001 From: Frédéric Buclin Date: Mon, 16 Mar 2015 18:15:08 +0100 Subject: 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 --- t/Support/Systemexec.pm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 't') diff --git a/t/Support/Systemexec.pm b/t/Support/Systemexec.pm index 65be229e3..e73763f8f 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; -- cgit v1.2.3-24-g4f1b