New option to only popup lore once per profile

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

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

@@ -77,6 +77,9 @@ function _M:learnLore(lore, nopopup, silent, nostop)
 	local l = self:getLore(lore, silent)
 	if not l then return end
 	local learnt = false
+
+	if not config.settings.tome.lore_popup and profile.mod.lore and profile.mod.lore.lore and profile.mod.lore.lore[lore] then nopopup = true end
+
 	if not self:knownLore(lore) or l.always_pop then
 		game.logPlayer(self, "Lore found: #0080FF#%s", l.name)
 		if not nopopup then

game/modules/tome/dialogs/GameOptions.lua

@@ -291,6 +291,15 @@ function _M:generateList()
 		game:saveSettings("tome.rest_before_explore", ("tome.rest_before_explore = %s\n"):format(tostring(config.settings.tome.rest_before_explore)))
 		self.c_list:drawItem(item)
 	end,}
+
+	local zone = Textzone.new{width=self.c_desc.w, height=self.c_desc.h, text=string.toTString"If disabled lore popups will only appear the first time you see the lore on your profile.\nIf enabled it will appear the first time you see it with each character.#WHITE#"}
+	list[#list+1] = { zone=zone, name=string.toTString"#GOLD##{bold}#Always show lore popup.#WHITE##{normal}#", status=function(item)
+		return tostring(config.settings.tome.lore_popup and "enabled" or "disabled")
+	end, fct=function(item)
+		config.settings.tome.lore_popup = not config.settings.tome.lore_popup
+		game:saveSettings("tome.lore_popup", ("tome.lore_popup = %s\n"):format(tostring(config.settings.tome.lore_popup)))
+		self.c_list:drawItem(item)
+	end,}
 --[[
 	local zone = Textzone.new{width=self.c_desc.w, height=self.c_desc.h, text=string.toTString"Your movement mode depends on which character/creature you're currently controlling.#WHITE#"}
 	list[#list+1] = { zone=zone, name=string.toTString"#GOLD##{bold}#Actor-based movement mode#WHITE##{normal}#", status=function(item)

game/modules/tome/load.lua

@@ -77,6 +77,7 @@ if type(config.settings.tome.autoassign_talents_on_birth) == "nil" then config.s
 if type(config.settings.tome.chat_log) == "nil" then config.settings.tome.chat_log = true end
 if type(config.settings.tome.actor_based_movement_mode) == "nil" then config.settings.tome.actor_based_movement_mode = true end
 if type(config.settings.tome.rest_before_explore) == "nil" then config.settings.tome.rest_before_explore = true end
+if type(config.settings.tome.lore_popup) == "nil" then config.settings.tome.lore_popup = true end
 if not config.settings.tome.fonts then config.settings.tome.fonts = {type="fantasy", size="normal"} end
 if not config.settings.tome.ui_theme2 then config.settings.tome.ui_theme2 = "metal" end
 if not config.settings.tome.uiset_mode then config.settings.tome.uiset_mode = "Minimalist" end