some option fluff

This commit is contained in:
Hendrik Leppkes
2008-02-02 14:34:35 +00:00
parent 319f5dc02a
commit 9102bb3f61
3 changed files with 38 additions and 35 deletions
+15 -13
View File
@@ -65,15 +65,17 @@ function module:GetOptionsObject()
if not self.baroptions then if not self.baroptions then
local obj = Bar.GetOptionObject(self) local obj = Bar.GetOptionObject(self)
local cat_general = { local cat_general_visibility_en = {
enabled = { order = 4,
order = 1,
name = "Enabled", name = "Enabled",
desc = "Enable/Disable the bar.", desc = "Enable/Disable the bar.",
type = "toggle", type = "toggle",
set = optSetter, set = optSetter,
get = optGetter, get = optGetter,
}, }
obj:AddElement("general", "enabled", cat_general_visibility_en, "visibility")
local cat_general = {
padding = { padding = {
order = 40, order = 40,
type = "range", type = "range",
@@ -83,8 +85,13 @@ function module:GetOptionsObject()
set = optSetter, set = optSetter,
get = optGetter, get = optGetter,
}, },
desc = {
order = 50,
type = "header",
name = "Button Configuration",
},
grid = { grid = {
order = 15, order = 55,
type = "toggle", type = "toggle",
name = "Button Grid", name = "Button Grid",
desc = "Toggle the button grid.", desc = "Toggle the button grid.",
@@ -92,13 +99,8 @@ function module:GetOptionsObject()
get = optGetter, get = optGetter,
width = "full", width = "full",
}, },
layout_header = {
order = 101,
type = "header",
name = "Layout Options",
},
buttons = { buttons = {
order = 110, order = 60,
name = "Buttons", name = "Buttons",
desc = "Number of buttons.", desc = "Number of buttons.",
type = "range", type = "range",
@@ -107,7 +109,7 @@ function module:GetOptionsObject()
get = optGetter, get = optGetter,
}, },
rows = { rows = {
order = 120, order = 70,
name = "Rows", name = "Rows",
desc = "Number of rows.", desc = "Number of rows.",
type = "range", type = "range",
@@ -116,7 +118,7 @@ function module:GetOptionsObject()
get = optGetter, get = optGetter,
}, },
} }
obj:AddElementGroup("general", "ActionBar", cat_general) obj:AddElementGroup("general", cat_general)
local swap = { local swap = {
type = "group", type = "group",
+16 -8
View File
@@ -125,18 +125,26 @@ function Bar:GetOptionObject()
name = "General Settings", name = "General Settings",
order = 1, order = 1,
args = { args = {
show = { visibility = {
order = 3, order = 5,
type = "toggle", type = "group",
name = "Show", inline = true,
desc = "Show/Hide the bar.", name = "",
get = optGetter, args = {
set = optSetter, show = {
order = 5,
type = "toggle",
name = "Show",
desc = "Show/Hide the bar.",
get = optGetter,
set = optSetter,
},
},
}, },
styleheader = { styleheader = {
order = 10, order = 10,
type = "header", type = "header",
name = "Style Options", name = "Bar Style & Layout",
}, },
alpha = { alpha = {
order = 20, order = 20,
+7 -14
View File
@@ -170,12 +170,13 @@ function optionParent:NewCategory(category, data)
self.table[category] = data self.table[category] = data
end end
local ov = nil
function optionParent:AddElement(category, element, data, ...) function optionParent:AddElement(category, element, data, ...)
local lvl = self.table[category] local lvl = self.table[category]
for i = 1, select('#', ...) do for i = 1, select('#', ...) do
local key = select(i, ...) local key = select(i, ...)
if not (lvl.args[key] and lvl.args[key].args) then if not (lvl.args[key] and lvl.args[key].args) then
error(("Sub-Level Key %s does not exist in options group or is no sub-group."):format(key), 2) error(("Sub-Level Key %s does not exist in options group or is no sub-group."):format(key), ov and 3 or 2)
end end
lvl = lvl.args[key] lvl = lvl.args[key]
end end
@@ -183,20 +184,12 @@ function optionParent:AddElement(category, element, data, ...)
lvl.args[element] = data lvl.args[element] = data
end end
function optionParent:AddElementGroup(category, group_desc, data, ...) function optionParent:AddElementGroup(category, data, ...)
local lvl = self.table[category] ov = true
for i = 1, select('#', ...) do for k,v in pairs(data) do
local key = select(i, ...) self:AddElement(category, k, v, ...)
if not (lvl.args[key] and lvl.args[key].args) then
error(("Sub-Level Key %s does not exist in options group or is no sub-group."):format(key), 2)
end
lvl = lvl.args[key]
end end
ov = nil
if not lvl.plugins then
lvl.plugins = {}
end
lvl.plugins[group_desc] = data
end end
function Bartender4:NewOptionObject(otbl) function Bartender4:NewOptionObject(otbl)