Added rate check

[etc/awesome.git] / helpers.lua

diff --git a/helpers.lua b/helpers.lua
index 70ca0293ea44cd3799e02f8ef2c9e3349c9eb9d6..137bd6ab54f4e36bd051f84e1b1cf39cd515b25f 100644 (file)
--- a/helpers.lua
+++ b/helpers.lua
@@ -13,6 +13,7 @@ local io     = { open  = io.open,
                  lines = io.lines,
                  popen = io.popen }
 local rawget = rawget
                  lines = io.lines,
                  popen = io.popen }
 local rawget = rawget

+local table  = { sort   = table.sort }

 
 -- Lain helper functions for internal use
 -- lain.helpers
 
 -- Lain helper functions for internal use
 -- lain.helpers


@@ -76,8 +77,11 @@ end
 
 helpers.timer_table = {}
 
 
 helpers.timer_table = {}
 

-function helpers.newtimer(name, timeout, fun, nostart)
-    helpers.timer_table[name] = capi.timer({ timeout = timeout })
+function helpers.newtimer(_name, timeout, fun, nostart)
+    local name = timeout
+    if not helpers.timer_table[name] then
+        helpers.timer_table[name] = capi.timer({ timeout = timeout })
+    end

     helpers.timer_table[name]:connect_signal("timeout", fun)
     helpers.timer_table[name]:start()
     if not nostart then
     helpers.timer_table[name]:connect_signal("timeout", fun)
     helpers.timer_table[name]:start()
     if not nostart then


@@ -113,4 +117,23 @@ end
 
 -- }}}
 
 
 -- }}}
 

+--{{{ Iterate over table of records sorted by keys
+function helpers.spairs(t)
+    -- collect the keys
+    local keys = {}
+    for k in pairs(t) do keys[#keys+1] = k end
+
+    table.sort(keys)
+
+    -- return the iterator function
+    local i = 0
+    return function()
+        i = i + 1
+        if keys[i] then
+            return keys[i], t[keys[i]]
+        end
+    end
+end
+--}}}
+

 return helpers
 return helpers