Re: testcover and tap_harness_args

Eric Wilhelm <[email protected]> Thu, 27 May 2010 12:37:02 -0700

Newsgroups	gmane.comp.lang.perl.modules.module-build
Message-ID	<[email protected]>

# from Elliot Shank
# on Thursday 27 May 2010 05:46:

>it uses Storable, which wasn't in core until 5.7.3

>+    $tap_harness_args = dclone($tap_harness_args);
>+    $orig_tap_harness_args = dclone($tap_harness_args);
>+    my $switches = $tap_harness_args->{switches} || [];
>+    push @{$switches}, '-MDevel::Cover';
>+    $tap_harness_args->{switches} = $switches;

  $orig_th_args = {%$th_args};
  $th_args->{switches} = 
   [@{$th_args->{switches}||[]}, '-MDevel::Cover'];

--Eric
-- 
"It is a mistake to allow any mechanical object to realize that you are 
in a hurry."
--Ralph's Observation
---------------------------------------------------
    http://scratchcomputing.com
---------------------------------------------------