fix achievement "that was close"

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

game/modules/tome/class/Actor.lua

@@ -519,7 +519,7 @@ function _M:die(src)
 	if src and src.resolveSource and src:resolveSource().player then
 		-- Achievements
 		local p = src:resolveSource()
-		if p.life == 1 then world:gainAchievement("THAT_WAS_CLOSE", p) end
+		if math.floor(p.life) <= 1 then world:gainAchievement("THAT_WAS_CLOSE", p) end
 		world:gainAchievement("EXTERMINATOR", p, self)
 		world:gainAchievement("PEST_CONTROL", p, self)
 

game/modules/tome/data/maps/wilderness/arda-fareast.lua

@@ -30,9 +30,10 @@ quickEntity('m', {always_remember = true, show_tooltip=true, name='mountains', d
 quickEntity('h', {always_remember = true, show_tooltip=true, name='low hills', display='^', color=colors.GREEN, back_color=colors.DARK_GREEN, image="terrain/hills.png", can_encounter="plain", equilibrium_level=-10})
 
 quickEntity('A', {always_remember = true, show_tooltip=true, name="Sun Wall Outpost (Town)", display='*', color=colors.GOLD, notice = true, change_level=1, change_zone="town-sunwall-outpost"})
+quickEntity('B', {always_remember = true, show_tooltip=true, name="Rak'shor Pride", display='>', color=colors.YELLOW, notice = true, change_level=1, change_zone="rakshor-pride"})
+quickEntity('C', {always_remember = true, show_tooltip=true, name="Gorbat Pride", display='>', color=colors.YELLOW, notice = true, change_level=1, change_zone="gorbat-pride"})
 
 quickEntity('1', {always_remember = true, show_tooltip=true, name="Gates of Morning", desc="A massive hole in the Sun Wall", display='*', color=colors.GOLD, back_color=colors.CRIMSON, image="terrain/gate-morning.png", tint=colors.GOLD, notice = true, change_level=1, change_zone="town-gates-of-morning"})
---quickEntity('2', {always_remember = true, show_tooltip=true, name="Minas Tirith (Town)", desc="Captical city of the Reunited-Kingdom and Gondor ruled by High King Eldarion", display='*', color={r=255, g=255, b=255}, image="terrain/town1.png", notice = true, change_level=1, change_zone="town-minas-tirith"})
 
 -- Load encounters for this map
 prepareEntitiesList("encounters", "mod.class.Encounter", "/data/general/encounters/arda-fareast.lua")