Hi All

I am trying this and I do not the right gets added.

use strict;
use lib '/opt/rt3/lib';

use RT;
use RT::Interface::CLI;
use Data::Dumper;

RT::LoadConfig();
RT::Init();

my $queue = RT::Queue->new( $RT::SystemUser );

my $group = RT::Group->new( $RT::SystemUser );

$queue->Load( 'Help' );

$group->LoadSystemRoleGroup( 'Requestor' );

$group->PrincipalObj->GrantRight( Object => $queue, Right =>
'ReplyToTicket' );

What am I doing wrong?

-- 
Asif Iqbal
PGP Key: 0xE62693C5 KeyServer: pgp.mit.edu
A: Because it messes up the order in which people normally read text.
Q: Why is top-posting such a bad thing?

-- 
RT Training in Seattle, June 19-20: http://bestpractical.com/training

Reply via email to