[Rt-commit] r19985 - in rtir/2.5/trunk/lib/RT/IR: .

[ruz at bestpractical.com]

Author: ruz
Date: Tue Jun 16 22:21:43 2009
New Revision: 19985

Added:
   rtir/2.5/trunk/lib/RT/IR/Test/
   rtir/2.5/trunk/lib/RT/IR/Test/Web.pm
Modified:
   rtir/2.5/trunk/lib/RT/IR/Test.pm

Log:
* add RT::IR::Test::Web

Modified: rtir/2.5/trunk/lib/RT/IR/Test.pm
==============================================================================
--- rtir/2.5/trunk/lib/RT/IR/Test.pm	(original)
+++ rtir/2.5/trunk/lib/RT/IR/Test.pm	Tue Jun 16 22:21:43 2009
@@ -11,7 +11,7 @@
 eval 'use RT::Test; 1'
     or Test::More::plan skip_all => "requires 3.8 to run tests. Error:\n$@\nYou may need to set PERL5LIB=/path/to/rt/lib";
 
-use RT::Test::Web;
+use RT::IR::Test::Web;
 
 our @EXPORT = qw(
     default_agent
@@ -102,7 +102,7 @@
 my $RTIR_TEST_PASS = "rtir_test_pass";
 
 sub default_agent {
-    my $agent = new RT::Test::Web;
+    my $agent = new RT::IR::Test::Web;
     require HTTP::Cookies;
     $agent->cookie_jar( HTTP::Cookies->new );
     rtir_user();

Added: rtir/2.5/trunk/lib/RT/IR/Test/Web.pm
==============================================================================
--- (empty file)
+++ rtir/2.5/trunk/lib/RT/IR/Test/Web.pm	Tue Jun 16 22:21:43 2009
@@ -0,0 +1,11 @@
+package RT::IR::Test::Web;
+
+use strict;
+use warnings;
+
+use base qw(RT::Test::Web);
+
+require RT::IR::Test;
+require Test::More;
+
+1;