[Http-webtest-commits] HTTP-WebTest-Recorder/lib/HTTP/WebTest/Recorder POE.pm,1.2,1.3

[Ilya M. <m_...@us...>]

Update of /cvsroot/http-webtest/HTTP-WebTest-Recorder/lib/HTTP/WebTest/Recorder
In directory sc8-pr-cvs1:/tmp/cvs-serv13119

Modified Files:
	POE.pm 
Log Message:
Identify user agent as HTTP-WebTest-Recorder/VERSION


Index: POE.pm
===================================================================
RCS file: /cvsroot/http-webtest/HTTP-WebTest-Recorder/lib/HTTP/WebTest/Recorder/POE.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** POE.pm	4 Apr 2003 21:52:20 -0000	1.2
--- POE.pm	26 Apr 2003 10:27:41 -0000	1.3
***************
*** 7,12 ****
  use POE qw(Component::Client::HTTP);
  
! POE::Component::Client::HTTP->spawn(Alias     => 'wt_recorder_ua',
!                                     Streaming => 1024);
  
  sub new {
--- 7,18 ----
  use POE qw(Component::Client::HTTP);
  
! use HTTP::WebTest::Recorder;
! 
! my $agent = 'HTTP-WebTest-Recorder/' . HTTP::WebTest::Recorder->VERSION;
! 
! POE::Component::Client::HTTP->spawn(Agent     => $agent,
!                                     Alias     => 'wt_recorder_ua',
!                                     Streaming => 1024,
!                                     );
  
  sub new {