Added an achievement for killing Harkor'Zun

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

game/modules/tome/data/achievements/kills.lua

@@ -70,3 +70,9 @@ newAchievement{
 		if self.nb >= 6 then return true end
 	end,
 }
+
+newAchievement{
+	name = "Earth Master", id = "GEOMANCER",
+	desc = [[Killed Harkor'Zun and unlocked the Geomancer class]],
+	mode = "player",
+}

game/modules/tome/data/general/npcs/xorn.lua

@@ -183,6 +183,7 @@ newEntity{ base = "BASE_NPC_XORN", define_as = "FULL_HARKOR_ZUN",
 	on_die = function(self)
 		if profile.mod.allow_build.mage then
 			game:setAllowedBuild("mage_geomancer", true)
+			world:gainAchievement("GEOMANCER", game.player)
 		end
 	end,
 }