Mercurial > wow > ouroloot

comparison options.lua @ 104:04198c8d0717

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Don't set a default keybinding, but rather change the associated option to not be clunky and gross.
author Farmbuyer of US-Kilrogg <farmbuyer@gmail.com>
date Sun, 05 Aug 2012 16:53:07 +0000
parents dc8a23a47b03
children 646c9b41aaed
comparison
equal deleted inserted replaced
103:dc8a23a47b03 104:04198c8d0717
181 -- possible keybindings 181 -- possible keybindings
182 do 182 do
183 local pair = AceGUI:Create("InlineGroup") 183 local pair = AceGUI:Create("InlineGroup")
184 pair:SetLayout("List") 184 pair:SetLayout("List")
185 pair:SetRelativeWidth(0.49) 185 pair:SetRelativeWidth(0.49)
186 pair:SetTitle("Keybinding for '/ouroloot'") 186 pair:SetTitle('Keybinding for "/ouroloot toggle"')
187 local editbox, checkbox 187 local checkbox, button
188 --[=[
188 editbox = mkbutton("EditBox", nil, opts.keybinding_text, 189 editbox = mkbutton("EditBox", nil, opts.keybinding_text,
189 [[Keybinding text format is fragile! (All caps, ALT then CTRL then SHIFT.) Relog to take effect.]]) 190 [[Keybinding text format is fragile! (All caps, ALT then CTRL then SHIFT.) Relog to take effect.]])
190 editbox:SetFullWidth(true) 191 editbox:SetFullWidth(true)
191 editbox:SetLabel("Keybinding text") 192 editbox:SetLabel("Keybinding text")
192 editbox:SetCallback("OnEnterPressed", function(_w,event,value) 193 editbox:SetCallback("OnEnterPressed", function(_w,event,value)
193 opts.keybinding_text = value 194 opts.keybinding_text = value
194 end) 195 end)
195 editbox:SetDisabled(not opts.keybinding) 196 editbox:SetDisabled(not opts.keybinding)
197 ]=]
196 checkbox = mktoggle('keybinding', "Register keybinding", 1, 198 checkbox = mktoggle('keybinding', "Register keybinding", 1,
197 [[Register a keybinding to toggle the loot display. Relog to take effect.]], 199 [[Whether to register a keybinding to toggle the loot display. Relog to take effect.]],
198 function (_w,_,value) 200 function (_w,_,value)
199 opts.keybinding = value 201 opts.keybinding = value
200 editbox:SetDisabled(not opts.keybinding) 202 --editbox:SetDisabled(not opts.keybinding)
203 button:SetDisabled(not opts.keybinding)
201 end) 204 end)
202 checkbox:SetFullWidth(true) 205 checkbox:SetFullWidth(true)
203 pair:AddChild(checkbox) 206 button = mkbutton("Keybinding", nil, "",
204 pair:AddChild(editbox) 207 -- This wording is not quite accurate, but auto-l10n is nice.
208 _G.BIND_KEY_TO_COMMAND:format([['/ouroloot toggle']]))
209 button:SetFullWidth(true)
210 --button:SetLabel("this is label text")
211 button:SetKey(opts.keybinding_text)
212 button.msgframe:SetToplevel(true) -- XXX ace3 ticket #305
213 button:SetCallback("OnKeyChanged", function(_b,event,value)
214 local possible_prev = opts.keybinding_text
215 opts.keybinding_text = value
216 -- If they were already binding something at login, try updating.
217 if not _G.OuroLootBindingOpen then return end
218 if possible_prev and #possible_prev > 0 then
219 addon:Print("Trying to unbind previous %s key.", possible_prev)
220 SetBinding (possible_prev, nil)
221 end
222 if value and #value > 0 then
223 addon:Print("Trying to bind new %s key.", value)
224 if SetBindingClick (value, "OuroLootBindingOpen") then
225 local c = GetCurrentBindingSet()
226 if c == ACCOUNT_BINDINGS or c == CHARACTER_BINDINGS then
227 SaveBindings(c)
228 end
229 end
230 end
231 end)
232 pair:AddChildren (checkbox, button)--, editbox)
205 container:AddChild(pair) 233 container:AddChild(pair)
206 end 234 end
207 235
208 -- replacement for slashloot 236 -- replacement for slashloot
209 do 237 do