Crypt of Kryl-Feijan quest will not succeed wrongly

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

game/modules/tome/data/zones/crypt-kryl-feijan/npcs.lua

@@ -77,6 +77,7 @@ You can discern great beauty under the stains of blood covering her skin.]],
 	ai = "summoned", ai_real = "move_dmap", ai_state = { ai_target="target_player", talent_in=4, },
 	stats = { str=8, dex=7, mag=8, con=12 },
 	faction = "victim",
+	never_anger = true,
 
 	body = { INVEN = 10, MAINHAND=1, OFFHAND=1, BODY=1, QUIVER=1 },
 	lite = 4,

game/modules/tome/data/zones/crypt-kryl-feijan/zone.lua

@@ -102,7 +102,9 @@ return {
 			return nil, nil, true
 		end
 
-		game.player:setQuestStatus("kryl-feijan-escape", engine.Quest.DONE)
+		if not game.player:isQuestStatus("kryl-feijan-escape", engine.Quest.FAILED) then
+			game.player:setQuestStatus("kryl-feijan-escape", engine.Quest.DONE)
+		end
 	end,
 
 	levels =