Update of /cvsroot/http-webtest/HTTP-WebTest-Plugin-XMLReport/lib/HTTP/WebTest/Plugin
In directory sc8-pr-cvs1:/tmp/cvs-serv27424/lib/HTTP/WebTest/Plugin
Modified Files:
XMLReport.pm
Log Message:
Compatiblity with HTTP::WebTest 2.00
Index: XMLReport.pm
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest-Plugin-XMLReport/lib/HTTP/WebTest/Plugin/XMLReport.pm,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** XMLReport.pm 30 Oct 2002 21:25:49 -0000 1.1.1.1
--- XMLReport.pm 26 Dec 2002 20:33:48 -0000 1.2
***************
*** 12,16 ****
=head2 VERSION
!
Pre release version 0.92 - $Revision$
--- 12,16 ----
=head2 VERSION
!
Pre release version 0.92 - $Revision$
***************
*** 56,60 ****
[...]
</testresults>
!
=head1 GLOBAL PARAMETERS
--- 56,60 ----
[...]
</testresults>
!
=head1 GLOBAL PARAMETERS
***************
*** 86,90 ****
=head2 test_name, name
! Set C<test_name> from C<wtscript> or C<name> as the hash key from
a test definition.
--- 86,90 ----
=head2 test_name, name
! Set C<test_name> from C<wtscript> or C<name> as the hash key from
a test definition.
***************
*** 185,190 ****
my $test_name = $self->test_param('test_name');
my $url = '';
! if($self->webtest->last_request) {
! $url = $self->webtest->last_request->uri;
}
--- 185,190 ----
my $test_name = $self->test_param('test_name');
my $url = '';
! if($self->webtest->current_request) {
! $url = $self->webtest->current_request->uri;
}
***************
*** 194,198 ****
my $out = '';
! for my $result (@{$self->webtest->last_results}) {
# test results
my $group_comment = $$result[0];
--- 194,198 ----
my $out = '';
! for my $result (@{$self->webtest->current_results}) {
# test results
my $group_comment = $$result[0];
|