Xelper, did you add a function to place aoe on targets? I don't remember.
need ids from people for snares/roots for hof and cleanse for ret/prot/holy soon.
Will rep+ 
edit: Why won't this work? Seems correct to me.
PHP Code:
if GetShapeshiftForm() ~= 0 then hasSeal = true else hasSeal = false end
local PQ_MarkTimer = 16
local PQ_JudTarget = "target"
local PQ_JeopardyTargets = {
[1] = "mouseover",
[2] = "focus",
}
if UnitExists("target") then
if UnitDebuffID("target",31801,"player") then
PQ_MarkTimer = select(7,UnitDebuffID("target",31801,"player")) - GetTime()
end
end
if hasSeal and UnitPower("player", 9) < 5 then
for i=1,#PQ_JeopardyTargets do
if UnitExists(PQ_JeopardyTargets[i]) and not UnitGUID(PQ_JeopardyTargets[i]) == PQ_LastJudGUID then
if UnitDebuffID(PQ_JeopardyTargets[i],31801,"player") then
local timer = select(7,UnitDebuffID(PQ_JeopardyTargets[i],31801,"player")) - GetTime()
if timer < PQ_MarkTimer then
PQ_MarkTimer = timer
PQ_JudTarget = PQ_JeopardyTargets[i]
end
else
PQ_MarkTimer = 0
PQ_JudTarget = PQ_JeopardyTargets[i]
break
end
end
end
PQR_CustomTarget = PQ_JudTarget
return true
end
PHP Code:
-- Frames
PQ_EventHandlerFrame, events = CreateFrame("Frame"), {};
function events:COMBAT_LOG_EVENT_UNFILTERED(...)
if (select(2, ...) == "SPELL_DAMAGE") and bit.band(select(6, ...), COMBATLOG_OBJECT_AFFILIATION_MASK) == COMBATLOG_OBJECT_AFFILIATION_MINE and bit.band(select(10, ...), COMBATLOG_OBJECT_AFFILIATION_MASK) == COMBATLOG_OBJECT_AFFILIATION_OUTSIDER then
if select(12, ...) == 20271 then
PQ_LastJudGUID = select(8, ...)
end
end
end
PQ_EventHandlerFrame:SetScript("OnEvent", function(self, event, ...) events[event](self, ...); end);
for k, v in pairs(events) do
PQ_EventHandlerFrame:RegisterEvent(k);
end