Update of /cvsroot/http-webtest/HTTP-WebTest/t
In directory sc8-pr-cvs1:/tmp/cvs-serv7752/t
Modified Files:
12-request.t 10-click.t 06-parser.t
Log Message:
Cosmetic fixes
Index: 12-request.t
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest/t/12-request.t,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** 12-request.t 22 Dec 2002 21:25:49 -0000 1.4
--- 12-request.t 26 Apr 2003 15:12:14 -0000 1.5
***************
*** 7,11 ****
use strict;
! use Test::More tests => 25;
use HTTP::WebTest::Request;
--- 7,11 ----
use strict;
! use Test::More tests => 24;
use HTTP::WebTest::Request;
***************
*** 15,21 ****
{
$REQUEST = HTTP::WebTest::Request->new;
! ok(defined $REQUEST);
! ok($REQUEST->isa('HTTP::WebTest::Request'));
! ok($REQUEST->isa('HTTP::Request'));
}
--- 15,20 ----
{
$REQUEST = HTTP::WebTest::Request->new;
! isa_ok($REQUEST, 'HTTP::WebTest::Request');
! isa_ok($REQUEST, 'HTTP::Request');
}
Index: 10-click.t
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest/t/10-click.t,v
retrieving revision 1.12
retrieving revision 1.13
diff -C2 -d -r1.12 -r1.13
*** 10-click.t 22 Dec 2002 21:25:49 -0000 1.12
--- 10-click.t 26 Apr 2003 15:12:14 -0000 1.13
***************
*** 286,291 ****
output_ref => \$text);
} else {
! # no exception - test have failed
! ok(0);
}
}
--- 286,290 ----
output_ref => \$text);
} else {
! fail('Was expecting an exception - did not get any');
}
}
Index: 06-parser.t
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest/t/06-parser.t,v
retrieving revision 1.22
retrieving revision 1.23
diff -C2 -d -r1.22 -r1.23
*** 06-parser.t 2 Mar 2003 11:57:03 -0000 1.22
--- 06-parser.t 26 Apr 2003 15:12:15 -0000 1.23
***************
*** 159,163 ****
output_ref => \$text);
} else {
! ok(0);
}
}
--- 159,163 ----
output_ref => \$text);
} else {
! fail('Was expecting an exception - did not get any');
}
}
|