/* call-seq:
 *      bz_group_allow_perms(group,perm) -> true or false
 *
 *      This method adds the specified permission to the specified group.
 *      On success it return true, on failure it returns false.
 */ 

static VALUE
bzflag_bz_groupAllowPerm(VALUE self, VALUE group, VALUE perm)
{

        if (bz_groupAllowPerm(RSTRING(StringValue(group))->ptr, RSTRING(StringValue(perm))->ptr))      
                return Qtrue;

        return Qfalse;
}