-local sourcewidth = 20;
-
-local outfunction = nil;
-
-function init(name)
- --name = nil; -- While this line is not commented, will automatically fill in file/line number info
- local namelen = #name;
- return function (level, message, ...)
- if outfunction then return outfunction(name, level, message, ...); end
-
- sourcewidth = math_max(#name+2, sourcewidth);
- if ... then
- io_write(name, rep(" ", sourcewidth-namelen), getstring(logstyles[level], level), "\t", format(message, ...), "\n");
- else
- io_write(name, rep(" ", sourcewidth-namelen), getstring(logstyles[level], level), "\t", message, "\n");
- end
+ return function (level, message, ...)
+ if level == "debug" then
+ return log_debug(message, ...);
+ elseif level == "info" then
+ return log_info(message, ...);
+ elseif level == "warn" then
+ return log_warn(message, ...);
+ elseif level == "error" then
+ return log_error(message, ...);