From b2a5cf808e9971f7f31fe7584ab00b45f57a1153 Mon Sep 17 00:00:00 2001
From: "p.kosyh" <p.kosyh@gmail.com>
Date: Thu, 21 Jan 2010 08:07:49 +0000
Subject: [PATCH] timer object added

---
 stead/stead.lua | 31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)

diff --git a/stead/stead.lua b/stead/stead.lua
index 388c38a..6d4f286 100644
--- a/stead/stead.lua
+++ b/stead/stead.lua
@@ -1816,6 +1816,37 @@ function delete(v)
 	allocator:delete(v);
 end
 
+timer = obj {
+	nam = 'timer',
+	ini = function(s)
+		if s._timer ~= nil and s._timer ~= 0 then
+			set_timer(s._timer);
+		end
+	end,
+	get = function(s)
+		if s._timer == nil then
+			return 0
+		end
+		return tonumber(s._timer);
+	end,
+	del = function(s, v)
+		s._timer = nil;
+		if  set_timer == nil then
+			return false
+		end
+		set_timer(0)
+		return true
+	end,
+	set = function(s, v)
+		s._timer = tonumber(v);
+		if set_timer == nil then
+			return false
+		end
+		set_timer(v)
+		return true
+	end
+};
+
 function vobj_save(self, name, h, need)
 	local dsc;
 	local w