oreolek/adventin
Archived
1
0
Fork 0
Code Pull requests Releases Activity

no call func in ref while search

Browse source
This commit is contained in:
p.kosyh 2010-07-27 07:17:11 +00:00
parent 0a11826b83
commit ff3de03557
2 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
stead/stead.lua
View file

@ -486,18 +486,18 @@ function obj(v)
end
function ref(n) -- ref object by name
function ref(n, nofunc) -- ref object by name
if type(n) == 'string' then
local f = loadstring('return '..n);
if f then
return ref(f());
return ref(f(), nofunc);
end
return nil;
end
if type(n) == 'table' then
return n;
end
if type(n) == 'function' then
if type(n) == 'function' and not nofunc then
local r,v = pcall(n);
if not r then
return nil
@ -578,7 +578,7 @@ end
function list_find(self, name)
local n, v, ii
for n,v,ii in opairs(self) do
if ref(v) == ref(name) then
if ref(v) == ref(name, true) then -- do not call func while search
return ii;
end
end

4
stead/xact.lua
View file

@ -61,7 +61,7 @@ __do_xact = function(str, self)
else
oo = objs():srch(o)
if not oo then
oo = ref(o)
oo = ref(o, true)
end
end
elseif isObject(self) then
@ -71,7 +71,7 @@ __do_xact = function(str, self)
error("Wrong link: "..s, 3);
end
d = d:gsub("<&colon;>", ":");
return xref(d, ref(oo), unpack(aarg));
return xref(d, ref(oo, true), unpack(aarg));
end
if type(str) ~= 'string' then return end
local s = stead.string.gsub(str,'{[^}]+}', xrefrep);