[Rt-commit] r5430 - in Test-Chimps: trunk/lib/Test trunk/lib/Test/Chimps trunk/t

zev at bestpractical.com zev at bestpractical.com
Fri Jun 23 17:33:37 EDT 2006


Author: zev
Date: Fri Jun 23 17:33:36 2006
New Revision: 5430

Modified:
   Test-Chimps/   (props changed)
   Test-Chimps/trunk/lib/Test/Chimps.pm
   Test-Chimps/trunk/lib/Test/Chimps/Client.pm
   Test-Chimps/trunk/t/05-client-basic.t

Log:
 r4197 at galvatron (orig r11):  zev | 2006-06-21 11:09:19 -0400
  r4196 at galvatron:  zev | 2006-06-21 11:08:56 -0400
  finished fixing name change
 


Modified: Test-Chimps/trunk/lib/Test/Chimps.pm
==============================================================================
--- Test-Chimps/trunk/lib/Test/Chimps.pm	(original)
+++ Test-Chimps/trunk/lib/Test/Chimps.pm	Fri Jun 23 17:33:36 2006
@@ -15,8 +15,8 @@
 The Collaborative Heterogeneous Infinite Monkey Perfection Service
 (CHIMPS) is a generalized testing framework designed to make
 integration testing easy.  You use L<Test::Chimps::Server> to
-create your CGI script for viewing and submitting reports, and you
-use L<Test::Chimps::Client> for submitting reports.  You will find
+create your CGI script for viewing and submitting reports, and
+you use L<Test::Chimps::Client> for submitting reports.  You will find
 some scripts in the examples directory which should get you
 started.
 

Modified: Test-Chimps/trunk/lib/Test/Chimps/Client.pm
==============================================================================
--- Test-Chimps/trunk/lib/Test/Chimps/Client.pm	(original)
+++ Test-Chimps/trunk/lib/Test/Chimps/Client.pm	Fri Jun 23 17:33:36 2006
@@ -95,8 +95,8 @@
   my %args = @_;
   $self->{reports} = $args{reports};
   foreach my $report (@{$self->{reports}}) {
-    croak "one the the specified reports is not a Test::Chimps"
-      if ! (ref $report && $report->isa('Test::Chimps'));
+    croak "one the the specified reports is not a Test::Chimps::Report"
+      if ! (ref $report && $report->isa('Test::Chimps::Report'));
   }
   $self->{server} = $args{server};
   $self->{compress} = $args{compress} || 0;

Modified: Test-Chimps/trunk/t/05-client-basic.t
==============================================================================
--- Test-Chimps/trunk/t/05-client-basic.t	(original)
+++ Test-Chimps/trunk/t/05-client-basic.t	Fri Jun 23 17:33:36 2006
@@ -12,7 +12,7 @@
 my $m = Test::TAP::Model::Visual->new_with_tests('t/bogus-tests/00-basic.t');
 
 # Test::Harness::Straps breaks under taint mode, so Test::TAP::Model also breaks
-my $r = Test::Smoke::Report->new(model => $m, report_text => "foo");
+my $r = Test::Chimps::Report->new(model => $m, report_text => "foo");
 
 my $reports = [$r];
 my $c = Test::Chimps::Client->new(reports => $reports,


More information about the Rt-commit mailing list