util/logger.lua

Tue, 04 Nov 2008 18:17:48 +0000

author
Matthew Wild <mwild1@gmail.com>
date
Tue, 04 Nov 2008 18:17:48 +0000
changeset 210
e679487e2fa4
parent 147
ccebb2720741
child 259
1485d272400d
permissions
-rw-r--r--

Part 2 of internal components. Should have mentioned that the previous commit was from waqas, this one from me.


local format = string.format;
local print = print;
local debug = debug;
local tostring = tostring;
module "logger"

function init(name)
	--name = nil; -- While this line is not commented, will automatically fill in file/line number info
	return 	function (level, message, ...)
				if not name then
					local inf = debug.getinfo(3, 'Snl');
					level = level .. ","..tostring(inf.short_src):match("[^/]*$")..":"..inf.currentline;
				end
				if ... then 
					print(level, format(message, ...));
				else
					print(level, message);
				end
			end
end

return _M;

mercurial