[Rt-commit] r14906 - rt/3.8/trunk/lib/RT/Test

[ruz at bestpractical.com]

Author: ruz
Date: Thu Aug  7 17:55:44 2008
New Revision: 14906

Modified:
   rt/3.8/trunk/lib/RT/Test/Web.pm

Log:
* add aditional debug hint after get_ok

Modified: rt/3.8/trunk/lib/RT/Test/Web.pm
==============================================================================
--- rt/3.8/trunk/lib/RT/Test/Web.pm	(original)
+++ rt/3.8/trunk/lib/RT/Test/Web.pm	Thu Aug  7 17:55:44 2008
@@ -62,7 +62,9 @@
     if ( $url =~ m{^/} ) {
         $url = $self->rt_base_url . $url;
     }
-    return $self->SUPER::get_ok($url, @_);
+    my $rv = $self->SUPER::get_ok($url, @_);
+    Test::More::diag "Couldn't get $url" unless $rv;
+    return $rv;
 }
 
 sub rt_base_url {