polop

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

game/modules/tome/class/PlayerDisplay.lua

@@ -106,7 +106,7 @@ function _M:makePortrait(a, current, x, y)
 	local def = game.party.members[a]
 	s:erase(0, 0, 0, 255, 6, 6, 32, 32)
 	local hl = 32 * math.max(0, a.life) / a.max_life
-	s:erase(colors.RED.r, colors.RED.g, colors.RED.b, 255, 6, 32+6-hl, 32, hl)
+	s:erase(colors.RED.r * 0.7, colors.RED.g * 0.7, colors.RED.b * 0.7, 255, 6, 32+6-hl, 32, hl)
 
 	self:mouseTooltip("#GOLD##{bold}#"..a.name.."\n#WHITE##{normal}#Level: "..a.level.."\n"..def.title, 40, 40, x, y, function()
 		if def.control == "full" then