Add OptionsFrame with debug option and add fix quest file

CzechQuests.lua

@@ -23,7 +23,7 @@ local function GetDataByKey(dataType, dataId)
                     objective = GetQuestInfo(quest.objectiveMale, quest.objectiveFemale),
                     description = GetQuestInfo(quest.descriptionMale, quest.descriptionFemale),
                     progress = GetQuestInfo(quest.progressMale, quest.progressFemale),
-                    completion = GetQuestInfo(quest.completionMal, quest.completionFemale),
+                    completion = GetQuestInfo(quest.completionMale, quest.completionFemale),
                 }
                 return standardQuest
             end
@@ -37,6 +37,8 @@ local function GetDataByKey(dataType, dataId)
 end
 
 local function replacePlaceholders(text)
+    if text == nil then return text end
+
     local playerName = UnitName("player")
     local _, playerClass = UnitClass("player")
     local _, playerRace = UnitRace("player")
@@ -44,7 +46,6 @@ local function replacePlaceholders(text)
     local class = GetDataByKey("classData", playerClass);
     local race = GetDataByKey("raceData", playerRace);
 
-
     local formatted = text;
     formatted = string.gsub(formatted, '<name>', playerName);
 
@@ -77,11 +78,14 @@ local function replacePlaceholders(text)
     return formatted
 end
 
-local function SetQuestDetails(headerText, objectiveText, descriptionHeader, descriptionText, parentFrame, yOffset)
-
+local function SetQuestDetails(questId, headerText, objectiveText, descriptionHeader, descriptionText, parentFrame, yOffset)
     objectiveText = replacePlaceholders(objectiveText);
     descriptionText = replacePlaceholders(descriptionText);
 
+    if CzechQuestsOptions["DEBUG_MODE"] then
+        headerText = headerText .. " (" .. questId ..")"
+    end
+
     QuestTranslationFramePrimaryHeader:SetText(headerText:upper())
     QuestTranslationFramePrimaryText:SetText(objectiveText)
     QuestTranslationFrameSecondaryHeader:SetText(descriptionHeader:upper())
@@ -134,12 +138,13 @@ local function UpdateQuestTranslationFrame()
                 QuestTranslationFrame:Show()
 
                 SetQuestDetails(
-                        questData.title,
-                        questData.objective,
-                        addonDataTable.translations["description"],
-                        questData.description,
-                        QuestLogFrame,
-                        -80
+                    questId,
+                    questData.title,
+                    questData.objective,
+                    addonDataTable.translations["description"],
+                    questData.description,
+                    QuestLogFrame,
+                    -80
                 )
             else
                 QuestTranslationFrame:Hide()
@@ -157,6 +162,7 @@ local function UpdateQuestTranslationFrame()
 
                 if lastQuestFrameEvent == "QUEST_PROGRESS" then
                     SetQuestDetails(
+                            questId,
                             questData.title,
                             questData.progress,
                             "",
@@ -166,6 +172,7 @@ local function UpdateQuestTranslationFrame()
                     )
                 elseif lastQuestFrameEvent == "QUEST_COMPLETE" then
                     SetQuestDetails(
+                            questId,
                             questData.title,
                             questData.completion,
                             "",
@@ -175,6 +182,7 @@ local function UpdateQuestTranslationFrame()
                     )
                 elseif lastQuestFrameEvent == "QUEST_DETAIL" then
                     SetQuestDetails(
+                            questId,
                             questData.title,
                             questData.description,
                             addonDataTable.translations["objectives"],