/* call-seq:
 *      player.has_perm? -> true or false
 *
 *      This method returns true if the player has the given perm,
 *      else itreturnsfalse
 */ 

static VALUE
playerRecord_isHasPerm(VALUE self, VALUE perm)
{

        bz_PlayerRecord *playerRecord;

        Data_Get_Struct(self, bz_PlayerRecord, playerRecord);

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

        return Qfalse;

}