From a04bff22194d476691dc6cd28dea6663116acc29 Mon Sep 17 00:00:00 2001
From: James Whitehead II <jnwhiteh@gmail.com>
Date: Wed, 11 Apr 2007 21:57:17 +0000
Subject: [PATCH] * Due to changes in Dongle, added a script to convert
 savedvariables, to retain profiles

---
 Clique.lua        |   49 ++++++++++++++++++++++++++++++++++++++++++++-----
 CliqueOptions.lua |    2 --
 2 files changed, 44 insertions(+), 7 deletions(-)

diff --git a/Clique.lua b/Clique.lua
index faee1f5..fbd5e9b 100644
--- a/Clique.lua
+++ b/Clique.lua
@@ -5,13 +5,49 @@
 Clique = {Locals = {}}
 
 assert(DongleStub, string.format("Clique requires DongleStub."))
-assert(DongleStub("Dongle-Beta1"), 
-	string.format("Clique requires Dongle-Beta1.  You are using an older version."))
-
-DongleStub("Dongle-Beta1"):New("Clique", Clique)
+DongleStub("Dongle-1.0"):New("Clique", Clique)
 
 local L = Clique.Locals
 
+function Clique:Initialize()
+	-- This is a small procedure to update the saved variables
+	local sv = CliqueDB
+
+	if sv and not sv.global.sv_converted then
+		if sv.char then
+			local converted = {}
+			for key,entry in pairs(sv.char) do
+				local char,server = key:match("^(.+) of (.+)$")
+				if char then
+					local new_key = ("%s - %s"):format(char, server)
+					converted[new_key] = entry
+				else
+					converted[key] = entry
+				end
+			end
+			sv.char = converted
+		end
+
+		if sv.profileKeys then
+			local converted = {}
+			for ukey,pkey in pairs(sv.profileKeys) do
+				-- Update each user key
+				local char,server = ukey:match("^(.+) of (.+)$")
+				if char then
+					local new_key = ("%s - %s"):format(char, server)
+					converted[new_key] = pkey
+				else
+					converted[key] = entry
+				end
+			end
+			sv.profileKeys = converted
+		end
+
+		if not sv.global then sv.global = {} end
+		sv.global.sv_converted = true
+	end
+end
+
 function Clique:Enable()
 	-- Grab the localisation header
 	L = Clique.Locals
@@ -98,6 +134,9 @@ function Clique:Enable()
 	self.cmd:RegisterSlashHandler("debug - Enables extra messages for debugging purposes", "debug", "ShowAttributes")
 	self.cmd:InjectDBCommands(self.db, "copy", "delete", "list", "reset", "set")
 	self.cmd:RegisterSlashHandler("tooltip - Enables binding lists in tooltips.", "tooltip", "ToggleTooltip")
+
+	-- Place the Clique tab
+	self:LEARNED_SPELL_IN_TAB()
 end
 
 function Clique:EnableFrames()
@@ -637,6 +676,6 @@ end
 function Clique:ToggleTooltip()
 	self.profile.tooltips = not self.profile.tooltips
 	self:PrintF("Listing of bindings in tooltips has been %s", 
-		self.profile.tooltips and "Enabled" or "Disabled")
+	self.profile.tooltips and "Enabled" or "Disabled")
 end
  
\ No newline at end of file
diff --git a/CliqueOptions.lua b/CliqueOptions.lua
index 2e1c9c6..1d94a1d 100644
--- a/CliqueOptions.lua
+++ b/CliqueOptions.lua
@@ -57,8 +57,6 @@ function Clique:OptionsOnLoad()
 
     CliquePulloutTab:Show()
 
-	self:LEARNED_SPELL_IN_TAB()
-
 	-- Hook the container buttons
 	local containerFunc = function(button)
 		if IsShiftKeyDown() and CliqueCustomArg1 then
-- 
1.7.9.5