diff options
| author | Hans Hagen <pragma@wxs.nl> | 2008-03-24 23:24:00 +0100 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2008-03-24 23:24:00 +0100 |
| commit | 55bcf0e607bb8af553581e74293687ed635bf877 (patch) | |
| tree | 328adc5c0c28d46fd49369999d0b160c3d7582f8 /tex/context/base/l-xml.lua | |
| parent | 3bcf8de3c62348cb5526ddb37b3f4ea0f3d1df4f (diff) | |
| download | context-55bcf0e607bb8af553581e74293687ed635bf877.tar.gz | |
stable 2008.03.24 23:24
Diffstat (limited to 'tex/context/base/l-xml.lua')
| -rw-r--r-- | tex/context/base/l-xml.lua | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/tex/context/base/l-xml.lua b/tex/context/base/l-xml.lua index 2ece2d91a..703a880ed 100644 --- a/tex/context/base/l-xml.lua +++ b/tex/context/base/l-xml.lua @@ -1033,7 +1033,7 @@ do end else if (command == 16 or command == 12) and index == 1 then -- initial ---~ wildcard = true + -- wildcard = true wildcard = command == 16 -- ok? index = index + 1 action = pattern[index] @@ -1139,9 +1139,13 @@ do if matched then -- combine tg test and at test if index == #pattern then if handle(root,rootdt,root.ri or k) then return false end - if wildcard and multiple then ---~ if wildcard or multiple then - if not traverse(e,pattern,handle,reverse,index,root,true) then return false end + if wildcard then + if multiple then + if not traverse(e,pattern,handle,reverse,index,root,true) then return false end + else + -- maybe or multiple; anyhow, check on (section|title) vs just section and title in example in lxml + if not traverse(e,pattern,handle,reverse,index,root) then return false end + end end else if not traverse(e,pattern,handle,reverse,index+1,root) then return false end |