JJussi,

I use the WebUI. It's waaaaaaaay easier. The programming is already done, so why re-create the same wheel?

Kenn
LBNL

On 1/30/2010 12:09 PM, JJussi wrote:
Hi list!

What, nowbody have any good answers. To how I, can give rights to just created group..
And I thought that I'm poor programmer...

On Friday, 29. Januaryta 2010 13:15:37 JJussi wrote:
Hi to list,
(I'm not very good Perl programmer, so this question may be (too) simple)

I can create group easily:

my $group = new RT::Group($RT::SystemUser);
my $gid = $group->CreateUserDefinedGroup(
      Name              => $vars{nimi},
      Description       => $vars{kuvaus},
    );

To give rights to that group I (try) to use:

my @gacl=('ShowTicket','CreateTicket','SeeQueue','ReplyToTicket');
my $principal = new RT::Principal($RT::SystemUser);
my $pid = $principal->Create(
      PrincipalType => 'Group',
      ObjectId => $gid,
      Disabled => '0',
    );

foreach (@gacl)
    {
      $xxx->GrandRight( Right => $_, Object => $gid);
    }

That $xxx is problem.. I need Principal-Object there, but
CreateUserDefinedGroup returns GroupID. How I can get that Object?



_______________________________________________
http://lists.bestpractical.com/cgi-bin/mailman/listinfo/rt-users

Community help: http://wiki.bestpractical.com
Commercial support: sa...@bestpractical.com

2010 RT Training Sessions!
San Francisco, CA, USA - Feb 22 & 23
Dublin, Ireland - Mar 15 & 16
Boston, MA, USA - April 5 & 6
Washington DC, USA - Oct 25 & 26

Discover RT's hidden secrets with RT Essentials from O'Reilly Media. 
Buy a copy at http://rtbook.bestpractical.com

Reply via email to