/* call-seq:
 *      bz_has_perm?(player_id, permission) -> true or false
 *
 *       Returns true if the player has the permission, if not 
 *       it returns false.
 */

static VALUE
bzflag_bz_hasPerm(VALUE self, VALUE playerID , VALUE perm)
{

        if (bz_hasPerm(FIX2INT(playerID), RSTRING(StringValue(perm))->ptr))
                return Qtrue;

        return Qfalse;

}