Rogue poisons can be applied with slings too

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

game/modules/tome/class/interface/Archery.lua

@@ -305,6 +305,15 @@ local function archery_projectile(tx, ty, tg, self, tmp)
 		end
 	end
 
+	-- Poison coating
+	if hitted and not target.dead and self.vile_poisons and next(self.vile_poisons) and target:canBe("poison") and weapon and weapon.talented == "sling" then
+		local tid = rng.table(table.keys(self.vile_poisons))
+		if tid then
+			local t = self:getTalentFromId(tid)
+			t.proc(self, t, target, weapon)
+		end
+	end
+
 	-- Special effect
 	if hitted and weapon and weapon.special_on_hit and weapon.special_on_hit.fct and (not target.dead or weapon.special_on_hit.on_kill) then
 		weapon.special_on_hit.fct(weapon, self, target)

game/modules/tome/data/talents/cunning/poisons.lua

@@ -60,7 +60,7 @@ newTalent{
 		end
 	end,
 	info = function(self, t)
-		return ([[Learn how to coat your weapons with poison. Each level, you will learn a new kind of poison:
+		return ([[Learn how to coat your melee weapons or sling ammo with poison. Each level, you will learn a new kind of poison:
 		Level 1: Deadly Poison
 		Level 2: Numbing Poison
 		Level 3: Insidious Poison