Cloaks are wearable

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

game/modules/tome/class/Game.lua

@@ -805,6 +805,7 @@ function _M:setupCommands()
 				{ "Character Sheet", function() game:unregisterDialog(menu) self.key:triggerVirtual("SHOW_CHARACTER_SHEET") end },
 				"keybinds",
 				{"Graphic Mode", function() game:unregisterDialog(menu) game:registerDialog(require("mod.dialogs.GraphicMode").new()) end},
+				"video",
 				"resolution",
 				"sound",
 				"save",

game/modules/tome/data/general/objects/cloak.lua

@@ -19,7 +19,7 @@
 
 newEntity{
 	define_as = "BASE_CLOAK",
-	slot = "BACK",
+	slot = "CLOAK",
 	type = "armor", subtype="cloak",
 	add_name = " (#ARMOR#)",
 	display = "(", color=colors.UMBER, image = resolvers.image_material("cloak", "cloth"),