From 3f78069df10241f1111e171ab9d1db40b33b5774 Mon Sep 17 00:00:00 2001
From: Bardur Arantsson <bardur@scientician.net>
Date: Thu, 31 May 2012 20:23:37 +0200
Subject: Lua: Move Theme winged race armor restriction to C.

---
 src/object1.c | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

(limited to 'src/object1.c')

diff --git a/src/object1.c b/src/object1.c
index a4676744..63789794 100644
--- a/src/object1.c
+++ b/src/object1.c
@@ -4029,6 +4029,24 @@ s16b wield_slot_ideal(object_type *o_ptr, bool_ ideal)
 	if (process_hooks_ret(HOOK_WIELD_SLOT, "d", "(O,d)", o_ptr, ideal))
 		return process_hooks_return[0].num;
 
+	/* Theme has restrictions for winged races. */
+	if (game_module_idx == MODULE_THEME)
+	{
+		cptr race_name = rp_ptr->title + rp_name;
+
+		if (streq(race_name, "Dragon") ||
+		    streq(race_name, "Eagle"))
+		{
+			switch (o_ptr->tval)
+			{
+			case TV_CLOAK:
+			case TV_HARD_ARMOR:
+			case TV_DRAG_ARMOR:
+				return -1;
+			}
+		}
+	}
+
 	/* Slot for equipment */
 	switch (o_ptr->tval)
 	{
-- 
cgit v1.2.3