Killing the Shade or Bill correctly triggers the quest for people who did not have it yet

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

game/modules/tome/data/zones/ruins-kor-pul/npcs.lua

@@ -66,6 +66,7 @@ newEntity{ define_as = "SHADE",
 
 	on_die = function(self, who)
 		game.state:activateBackupGuardian("KOR_FURY", 5, 35, ".. yes I tell you! The old ruins of Kor'Pul are still haunted!")
+		game.player:resolveSource():grantQuest("start-allied")
 		game.player:resolveSource():setQuestStatus("start-allied", engine.Quest.COMPLETED, "kor-pul")
 	end,
 }

game/modules/tome/data/zones/trollmire/npcs.lua

@@ -64,6 +64,7 @@ He is wielding a small tree trunk and lumbering toward you.]],
 
 	on_die = function(self, who)
 		game.state:activateBackupGuardian("ALUIN", 2, 35, "... and we thought the trollmire was safer now!")
+		game.player:resolveSource():grantQuest("start-allied")
 		game.player:resolveSource():setQuestStatus("start-allied", engine.Quest.COMPLETED, "trollmire")
 		if who and who.level and who.level == 1 then
 			world:gainAchievement("KILL_BILL", game.player)