On Sun, Jan 19, 2003 at 06:28:13PM -0600, Ken Williams wrote:
> Currently 'make perldb' only works when you're using a test.pl, it
> fails if you're using t/foo.t files. The following patch fixes it, by
> analogy with the 'test_dynamic' section.
<snip>
> - push(@m, $self->test_via_script('$(FULLPERLRUN) $(TESTDB_SW)',
> - '$(TEST_FILE)'));
> + push(@m, $self->test_via_harness('$(FULLPERLRUN) $(TESTDB_SW)',
> '$(TEST_FILES)'))
> + if $tests;
> + push(@m, $self->test_via_script('$(FULLPERLRUN) $(TESTDB_SW)',
> '$(TEST_FILE)'))
> + if -f "test.pl";
This looks like it will do the equivalent of:
perl -dwle 'use Test::Harness; runtests @ARGV' t/*.t
which means the user will find themselves stepping through
Test::Harness::runtests() and not their tests.
--
Michael G. Schwern <[EMAIL PROTECTED]> http://www.pobox.com/~schwern/
Perl Quality Assurance <[EMAIL PROTECTED]> Kwalitee Is Job One
