modules/admin-full: fix default state option on led control page

[project/luci.git] / modules / admin-full / luasrc / model / cbi / admin_system / leds.lua

diff --git a/modules/admin-full/luasrc/model/cbi/admin_system/leds.lua b/modules/admin-full/luasrc/model/cbi/admin_system/leds.lua
index 5074a73..b48ade5 100644 (file)
--- a/modules/admin-full/luasrc/model/cbi/admin_system/leds.lua
+++ b/modules/admin-full/luasrc/model/cbi/admin_system/leds.lua
@@ -11,17 +11,16 @@ You may obtain a copy of the License at
 
 $Id$
 ]]--
-m = Map("system", translate("leds"), translate("leds_desc"))
+m = Map("system", translate("<abbr title=\"Light Emitting Diode\">LED</abbr> Configuration"), translate("Customizes the behaviour of the device <abbr title=\"Light Emitting Diode\">LED</abbr>s if possible."))
 
 local sysfs_path = "/sys/class/leds/"
 local leds = {}
 
-if luci.fs.access(sysfs_path) then
-       for k, v in pairs(luci.fs.dir(sysfs_path)) do
-               if v ~= "." and v ~= ".." then
-                       table.insert(leds, v)
-               end
-       end
+local fs   = require "nixio.fs"
+local util = require "nixio.util"
+
+if fs.access(sysfs_path) then
+       leds = util.consume((fs.dir(sysfs_path)))
 end
 
 if #leds == 0 then
@@ -39,33 +38,33 @@ function s.parse(self, ...)
 end
 
 
-s:option(Value, "name")
+s:option(Value, "name", translate("Name"))
 
 
-sysfs = s:option(ListValue, "sysfs")
+sysfs = s:option(ListValue, "sysfs", translate("<abbr title=\"Light Emitting Diode\">LED</abbr> Name"))
 for k, v in ipairs(leds) do
        sysfs:value(v)
 end
 
-s:option(Flag, "default").rmempty = true
+s:option(Flag, "default", translate("Default state")).rmempty = false
 
 
-trigger = s:option(ListValue, "trigger")
+trigger = s:option(ListValue, "trigger", translate("Trigger"))
 
-local triggers = luci.fs.readfile(sysfs_path .. leds[1] .. "/trigger")
+local triggers = fs.readfile(sysfs_path .. leds[1] .. "/trigger")
 for t in triggers:gmatch("[%w-]+") do
-       trigger:value(t, translate("system_led_trigger_" .. t:gsub("-", "")))
-end 
+       trigger:value(t, translate(t:gsub("-", "")))
+end
 
 
-delayon = s:option(Value, "delayon")
+delayon = s:option(Value, "delayon", translate ("On-State Delay"))
 delayon:depends("trigger", "timer")
 
-delayoff = s:option(Value, "delayoff")
+delayoff = s:option(Value, "delayoff", translate ("Off-State Delay"))
 delayoff:depends("trigger", "timer")
 
 
-dev = s:option(ListValue, "dev")
+dev = s:option(ListValue, "dev", translate("Device"))
 dev.rmempty = true
 dev:value("")
 dev:depends("trigger", "netdev")
@@ -76,11 +75,11 @@ for k, v in pairs(luci.sys.net.devices()) do
 end
 
 
-mode = s:option(MultiValue, "mode")
+mode = s:option(MultiValue, "mode", translate("Trigger Mode"))
 mode.rmempty = true
 mode:depends("trigger", "netdev")
-mode:value("link", translate("system_led_mode_link"))
-mode:value("tx", translate("system_led_mode_tx"))
-mode:value("rx", translate("system_led_mode_rx"))
+mode:value("link", translate("Link On"))
+mode:value("tx", translate("Transmit"))
+mode:value("rx", translate("Receive"))
 
-return m
\ No newline at end of file
+return m