Using a hotkeyed item will first try to activate it and if not possible wear it

git-svn-id: http://svn.net-core.org/repos/t-engine4@4528 51575b47-30f0-44d4-a5cc-537603b46e54

game/modules/tome/class/Player.lua

@@ -687,6 +687,13 @@ function _M:hotkeyInventory(name)
 	if not o then
 		Dialog:simplePopup("Item not found", "You do not have any "..name..".")
 	else
+		-- Wear it ??
+		if o:wornInven() and not o.wielded then
+			if not o.use_no_wear then
+				self:doWear(inven, item, o)
+				return
+			end
+		end
 		self:playerUseItem(o, item, inven)
 	end
 end