<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta content="text/html;charset=ISO-8859-1" http-equiv="Content-Type">
</head>
<body bgcolor="#ffffff" text="#000000">
JJussi,<br>
<br>
I use the WebUI. It's waaaaaaaay easier. The programming is already
done, so why re-create the same wheel?<br>
<br>
Kenn<br>
LBNL<br>
<br>
On 1/30/2010 12:09 PM, JJussi wrote:
<blockquote cite="mid:201001302209.43993.rt-users@jjussi.com"
type="cite">
<pre wrap="">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:
</pre>
<blockquote type="cite">
<pre wrap="">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?
</pre>
</blockquote>
<pre wrap=""><!---->
</pre>
</blockquote>
</body>
</html>