[Http-webtest-commits] HTTP-WebTest-Plugin-XMLReport/lib/HTTP/WebTest/Plugin XMLReport.pm,1.3,1.4

[Johannes la P. <joe...@us...>]

Update of /cvsroot/http-webtest/HTTP-WebTest-Plugin-XMLReport/lib/HTTP/WebTest/Plugin
In directory sc8-pr-cvs1:/tmp/cvs-serv2333/lib/HTTP/WebTest/Plugin

Modified Files:
	XMLReport.pm 
Log Message:
Replaced Test::More by Test (fix spurious failure with SelfTest), added time zone to date string

Index: XMLReport.pm
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest-Plugin-XMLReport/lib/HTTP/WebTest/Plugin/XMLReport.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** XMLReport.pm	2 Jan 2003 16:52:16 -0000	1.3
--- XMLReport.pm	6 Jan 2003 12:25:02 -0000	1.4
***************
*** 4,9 ****
  use base qw(HTTP::WebTest::ReportPlugin);
  use XML::Writer;
  use vars qw($VERSION);
! $VERSION = '1.00';
  
  =head1 NAME
--- 4,10 ----
  use base qw(HTTP::WebTest::ReportPlugin);
  use XML::Writer;
+ use POSIX qw(strftime);
  use vars qw($VERSION);
! $VERSION = '1.01';
  
  =head1 NAME
***************
*** 180,185 ****
  
      $self->_init_xml_writer;
! 
!     $self->{x_out}->startTag('testresults', 'date' => scalar localtime());
      $self->{x_out}->characters("\n");
      $self->SUPER::start_tests;
--- 181,187 ----
  
      $self->_init_xml_writer;
!     # use RFC822-conformant date string including Time Zone
!     $self->{x_out}->startTag('testresults',
!              'date' => strftime("%a, %d %b %Y %H:%M:%S %z", localtime()));
      $self->{x_out}->characters("\n");
      $self->SUPER::start_tests;