[Rt-commit] r8320 - rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT

[ruz at bestpractical.com]

Author: ruz
Date: Mon Jul 30 16:18:08 2007
New Revision: 8320

Modified:
   rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Test.pm

Log:
* return true value from set_rights to make it possible to write
  "ok( RT::Test->set_right..."

Modified: rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Test.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Test.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL-TUNIS/lib/RT/Test.pm	Mon Jul 30 16:18:08 2007
@@ -112,7 +112,7 @@
 
 sub started_ok {
     require RT::Test::Web;
-    if ($existing_server) {
+    if ( $existing_server ) {
         ok(1, "using existing server $existing_server");
         warn $existing_server;
         return ($existing_server, RT::Test::Web->new);
@@ -134,7 +134,7 @@
     );
     unless ( $dbh ) {
         my $msg = "Failed to connect to $dsn as user '$user': ". $DBI::errstr;
-    print STDERR $msg; exit -1;
+        print STDERR $msg; exit -1;
     }
     return $dbh;
 }
@@ -237,6 +237,7 @@
             warn "$msg";
         }
     }
+    return 1;
 }
 
 1;