git-svn-id: https://crawl-ref.svn.sourceforge.net/svnroot/crawl-ref/trunk@1884 c06c8d41-db1a-0410-9941-cceddc491573
CWTKS62IFZYYR3HGPDP5LW5C53CRWVAD6AAEOV4BSWNW52BCQH3QC case OBJ_CORPSES:if (you.species == SP_VAMPIRE){if (kindof_thing == CORPSE_BODY)return true;else{if (!suppress_msg)mpr("Blech - you need blood!");return false;}}return false;case OBJ_POTIONS: // called by luaif (get_ident_type(OBJ_POTIONS, kindof_thing) != ID_KNOWN_TYPE)return true;switch (kindof_thing){case POT_BLOOD:if (ur_herbivorous){if (!suppress_msg)mpr("Urks, you're a herbivore!");return false;}return true;case POT_WATER:if (you.species == SP_VAMPIRE){if (!suppress_msg)mpr("Blech - you need blood!");return false;}return true;case POT_PORRIDGE:if (you.species == SP_VAMPIRE){if (!suppress_msg)mpr("Blech - you need blood!");return false;}else if (ur_carnivorous){if (!suppress_msg)mpr("Sorry, you're a carnivore.");return false;}default:return true;}