[Rt-commit] r5192 - in rt/branches/3.7-EXPERIMENTAL: .

ruz at bestpractical.com ruz at bestpractical.com
Wed May 10 17:38:20 EDT 2006


Author: ruz
Date: Wed May 10 17:38:18 2006
New Revision: 5192

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/lib/t/regression/07-rights.t

Log:
 r2833 at cubic-pc:  cubic | 2006-05-10 14:47:00 +0400
 * allow to run test file multiple times 


Modified: rt/branches/3.7-EXPERIMENTAL/lib/t/regression/07-rights.t
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/t/regression/07-rights.t	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/t/regression/07-rights.t	Wed May 10 17:38:18 2006
@@ -68,15 +68,16 @@
 	$ace->Delete;
 }
 
+my $rand_name = "rights". int rand($$);
 # create new queue to be shure we don't mess with rights
 my $queue = RT::Queue->new($RT::SystemUser);
-my ($queue_id) = $queue->Create( Name => 'rights');
+my ($queue_id) = $queue->Create( Name => $rand_name);
 ok( $queue_id, 'queue created for rights tests' );
 
 # new privileged user to check rights
 my $user = RT::User->new( $RT::SystemUser );
-my ($user_id) = $user->Create( Name => 'rights',
-			   EmailAddress => 'rights at localhost',
+my ($user_id) = $user->Create( Name => $rand_name,
+			   EmailAddress => $rand_name .'@localhost',
 			   Privileged => 1,
 			   Password => 'qwe123',
 			 );


More information about the Rt-commit mailing list