fix: purge lingering completed quest icons

Tests/QuestieQuestCompletionCleanup_spec.lua

@@ -0,0 +1,57 @@
+local function read(path)
+    local f = assert(io.open(path, "r"), "cannot open " .. path)
+    local content = f:read("*a")
+    f:close()
+    return content
+end
+
+local function has(content, needle)
+    return content:find(needle, 1, true) ~= nil
+end
+
+describe("QuestieQuest completion objective pin cleanup", function()
+    local questieQuest = read("Modules/Quest/QuestieQuest.lua")
+    local questieMap = read("Modules/Map/QuestieMap.lua")
+    local questEventHandler = read("Modules/Quest/QuestEventHandler.lua")
+
+    it("unloads objective-owned spawned pins before clearing cached objectives", function()
+        local completeStart = assert(questieQuest:find("function QuestieQuest:CompleteQuest(questId)", 1, true))
+        local completeEnd = assert(questieQuest:find("---@param questId number\nfunction QuestieQuest:AbandonedQuest", completeStart, true))
+        local completeQuest = questieQuest:sub(completeStart, completeEnd)
+        local cleanupCall = assert(completeQuest:find("_CleanupCompletedQuestObjectivePins(quest)", 1, true))
+        local clearObjectives = assert(completeQuest:find("quest.Objectives = {}", 1, true))
+
+        assert.is_true(cleanupCall < clearObjectives)
+    end)
+
+    it("cleans standard objectives, special objectives, and registry frames", function()
+        local helperStart = assert(questieQuest:find("local function _CleanupCompletedQuestObjectivePins(quest)", 1, true))
+        local helperEnd = assert(questieQuest:find("---@param questId number\nfunction QuestieQuest:CompleteQuest", helperStart, true))
+        local helper = questieQuest:sub(helperStart, helperEnd)
+
+        assert.is_true(has(helper, "for objectiveIndex, objective in pairs(quest.Objectives) do"))
+        assert.is_true(has(helper, "_UnloadAlreadySpawnedIcons(objective)"))
+        assert.is_true(has(helper, "QuestieMap:UnloadQuestFramesForObjective(quest.Id, objectiveIndex)"))
+        assert.is_true(has(helper, "for _, objective in pairs(quest.SpecialObjectives) do"))
+        assert.is_true(has(helper, "QuestieMap:PurgeQuestFrames(quest.Id)"))
+    end)
+
+    it("purges quest-owned frames from HBD registries and pending draw queues", function()
+        assert.is_true(has(questieMap, "function QuestieMap:PurgeQuestFrames(questId)"))
+        assert.is_true(has(questieMap, "if not iconType then\n        QuestieMap:PurgeQuestFrames(questId)"))
+        assert.is_true(has(questieMap, "QuestieMap._mapDrawQueue"))
+        assert.is_true(has(questieMap, "QuestieMap._minimapDrawQueue"))
+        assert.is_true(has(questieMap, "HBDPins.activeMinimapPins"))
+        assert.is_true(has(questieMap, "HBDPins.worldmapPins"))
+        assert.is_true(has(questieMap, "frame.data.Id == questId"))
+    end)
+
+    it("uses the last known complete state when fallback detects a removed quest", function()
+        local fallbackStart = assert(questEventHandler:find("function _QuestEventHandler:CleanupRemovedQuestsFallback()", 1, true))
+        local fallback = questEventHandler:sub(fallbackStart)
+
+        assert.is_true(has(fallback, "local completeAtRemoval = QuestieDB.IsComplete(questId)"))
+        assert.is_true(has(fallback, "local shouldComplete = wasTurnedIn or wasAlreadyComplete or completeAtRemoval == 1"))
+        assert.is_true(has(fallback, "if shouldComplete then"))
+    end)
+end)