On Wed, 19 Dec 2001, Barrie Slaymaker wrote:
> I noticed that Test::Builder offers the ability to emit messages with
> s/^/# /mg, which is very nice. Can/should this capability be exposed
> via Test::Simple, Test::More, etc?
Can't you just "use Test::Builder" somewhere in your test script like so:
use Test::More tests => 2;
use Test::Builder;
# get the singleton
my $Test = Test::Builder->new();
unless(ok(0,"first test"))
{
# more diagnostic messages
$Test->diag("Ooops\n","Badness\n");
}
# this will still work
ok(1, "second test");
Of course, a nicer interface than having to fall back to Test::Builder
would be, um, nice.
Later.
Mark.
--
s'' Mark Fowler London.pm Bath.pm
http://www.twoshortplanks.com/ [EMAIL PROTECTED]
';use Term'Cap;$t=Tgetent Term'Cap{};print$t->Tputs(cl);for$w(split/ +/
){for(0..30){$|=print$t->Tgoto(cm,$_,$y)." $w";select$k,$k,$k,.03}$y+=2}
