beta 2012.10.20 11:51

13 files changed, 177 insertions, 5 deletions

diff --git a/scripts/context/lua/mtxrun.lua b/scripts/context/lua/mtxrun.lua
index b3170f7b2..97690ecc7 100644
--- a/scripts/context/lua/mtxrun.lua
+++ b/scripts/context/lua/mtxrun.lua
@@ -11103,6 +11103,49 @@ function xml.separate(x,pattern)
     return x
 end
 
+--
+
+local helpers = xml.helpers or { }
+xml.helpers   = helpers
+
+local function normal(e,action)
+    local edt = e.dt
+    if edt then
+        for i=1,#edt do
+            local str = edt[i]
+            if type(str) == "string" and str ~= "" then
+                edt[i] = action(str)
+            end
+        end
+    end
+end
+
+local function recurse(e,action)
+    local edt = e.dt
+    if edt then
+        for i=1,#edt do
+            local str = edt[i]
+            if type(str) ~= "string" then
+                recurse(str,action,recursive)
+            elseif str ~= "" then
+                edt[i] = action(str)
+            end
+        end
+    end
+end
+
+function helpers.recursetext(collected,action,recursive)
+    if recursive then
+        for i=1,#collected do
+            recurse(collected[i],action)
+        end
+    else
+        for i=1,#collected do
+           normal(collected[i],action)
+        end
+    end
+end
+
 
 end -- of closure
 
diff --git a/scripts/context/stubs/mswin/mtxrun.lua b/scripts/context/stubs/mswin/mtxrun.lua
index b3170f7b2..97690ecc7 100644
--- a/scripts/context/stubs/mswin/mtxrun.lua
+++ b/scripts/context/stubs/mswin/mtxrun.lua
@@ -11103,6 +11103,49 @@ function xml.separate(x,pattern)
     return x
 end
 
+--
+
+local helpers = xml.helpers or { }
+xml.helpers   = helpers
+
+local function normal(e,action)
+    local edt = e.dt
+    if edt then
+        for i=1,#edt do
+            local str = edt[i]
+            if type(str) == "string" and str ~= "" then
+                edt[i] = action(str)
+            end
+        end
+    end
+end
+
+local function recurse(e,action)
+    local edt = e.dt
+    if edt then
+        for i=1,#edt do
+            local str = edt[i]
+            if type(str) ~= "string" then
+                recurse(str,action,recursive)
+            elseif str ~= "" then
+                edt[i] = action(str)
+            end
+        end
+    end
+end
+
+function helpers.recursetext(collected,action,recursive)
+    if recursive then
+        for i=1,#collected do
+            recurse(collected[i],action)
+        end
+    else
+        for i=1,#collected do
+           normal(collected[i],action)
+        end
+    end
+end
+
 
 end -- of closure
 
diff --git a/scripts/context/stubs/unix/mtxrun b/scripts/context/stubs/unix/mtxrun
index b3170f7b2..97690ecc7 100644
--- a/scripts/context/stubs/unix/mtxrun
+++ b/scripts/context/stubs/unix/mtxrun
@@ -11103,6 +11103,49 @@ function xml.separate(x,pattern)
     return x
 end
 
+--
+
+local helpers = xml.helpers or { }
+xml.helpers   = helpers
+
+local function normal(e,action)
+    local edt = e.dt
+    if edt then
+        for i=1,#edt do
+            local str = edt[i]
+            if type(str) == "string" and str ~= "" then
+                edt[i] = action(str)
+            end
+        end
+    end
+end
+
+local function recurse(e,action)
+    local edt = e.dt
+    if edt then
+        for i=1,#edt do
+            local str = edt[i]
+            if type(str) ~= "string" then
+                recurse(str,action,recursive)
+            elseif str ~= "" then
+                edt[i] = action(str)
+            end
+        end
+    end
+end
+
+function helpers.recursetext(collected,action,recursive)
+    if recursive then
+        for i=1,#collected do
+            recurse(collected[i],action)
+        end
+    else
+        for i=1,#collected do
+           normal(collected[i],action)
+        end
+    end
+end
+
 
 end -- of closure
 
diff --git a/tex/context/base/cont-new.mkii b/tex/context/base/cont-new.mkii
index a9c083588..3558d782a 100644
--- a/tex/context/base/cont-new.mkii
+++ b/tex/context/base/cont-new.mkii
@@ -11,7 +11,7 @@
 %C therefore copyrighted by \PRAGMA. See mreadme.pdf for
 %C details.
 
-\newcontextversion{2012.10.20 02:07}
+\newcontextversion{2012.10.20 11:51}
 
 %D This file is loaded at runtime, thereby providing an
 %D excellent place for hacks, patches, extensions and new
diff --git a/tex/context/base/cont-new.mkiv b/tex/context/base/cont-new.mkiv
index e69a0d016..34ca807c7 100644
--- a/tex/context/base/cont-new.mkiv
+++ b/tex/context/base/cont-new.mkiv
@@ -11,7 +11,7 @@
 %C therefore copyrighted by \PRAGMA. See mreadme.pdf for
 %C details.
 
-\newcontextversion{2012.10.20 02:07}
+\newcontextversion{2012.10.20 11:51}
 
 %D This file is loaded at runtime, thereby providing an excellent place for
 %D hacks, patches, extensions and new features.
diff --git a/tex/context/base/context-version.pdf b/tex/context/base/context-version.pdf
index 2f7df127d..4511e8475 100644
--- a/tex/context/base/context-version.pdf
+++ b/tex/context/base/context-version.pdf
diff --git a/tex/context/base/context-version.png b/tex/context/base/context-version.png
index cccfe00f0..c6acd444d 100644
--- a/tex/context/base/context-version.png
+++ b/tex/context/base/context-version.png
diff --git a/tex/context/base/context.mkii b/tex/context/base/context.mkii
index 0748eb032..4f2df4a0a 100644
--- a/tex/context/base/context.mkii
+++ b/tex/context/base/context.mkii
@@ -20,7 +20,7 @@
 %D your styles an modules.
 
 \edef\contextformat {\jobname}
-\edef\contextversion{2012.10.20 02:07}
+\edef\contextversion{2012.10.20 11:51}
 
 %D For those who want to use this:
 
diff --git a/tex/context/base/context.mkiv b/tex/context/base/context.mkiv
index 8f7888f14..a413e8e82 100644
--- a/tex/context/base/context.mkiv
+++ b/tex/context/base/context.mkiv
@@ -25,7 +25,7 @@
 %D up and the dependencies are more consistent.
 
 \edef\contextformat {\jobname}
-\edef\contextversion{2012.10.20 02:07}
+\edef\contextversion{2012.10.20 11:51}
 
 %D For those who want to use this:
 
diff --git a/tex/context/base/lxml-aux.lua b/tex/context/base/lxml-aux.lua
index be12659ba..053e49303 100644
--- a/tex/context/base/lxml-aux.lua
+++ b/tex/context/base/lxml-aux.lua
@@ -766,3 +766,46 @@ function xml.separate(x,pattern)
     end
     return x
 end
+
+--
+
+local helpers = xml.helpers or { }
+xml.helpers   = helpers
+
+local function normal(e,action)
+    local edt = e.dt
+    if edt then
+        for i=1,#edt do
+            local str = edt[i]
+            if type(str) == "string" and str ~= "" then
+                edt[i] = action(str)
+            end
+        end
+    end
+end
+
+local function recurse(e,action)
+    local edt = e.dt
+    if edt then
+        for i=1,#edt do
+            local str = edt[i]
+            if type(str) ~= "string" then
+                recurse(str,action,recursive)
+            elseif str ~= "" then
+                edt[i] = action(str)
+            end
+        end
+    end
+end
+
+function helpers.recursetext(collected,action,recursive)
+    if recursive then
+        for i=1,#collected do
+            recurse(collected[i],action)
+        end
+    else
+        for i=1,#collected do
+           normal(collected[i],action)
+        end
+    end
+end
diff --git a/tex/context/base/status-files.pdf b/tex/context/base/status-files.pdf
index d489f2697..3216b2237 100644
--- a/tex/context/base/status-files.pdf
+++ b/tex/context/base/status-files.pdf
diff --git a/tex/context/base/status-lua.pdf b/tex/context/base/status-lua.pdf
index b4e1e10bf..4c8c34cae 100644
--- a/tex/context/base/status-lua.pdf
+++ b/tex/context/base/status-lua.pdf
diff --git a/tex/generic/context/luatex/luatex-fonts-merged.lua b/tex/generic/context/luatex/luatex-fonts-merged.lua
index 8d8df9414..1ae484cc4 100644
--- a/tex/generic/context/luatex/luatex-fonts-merged.lua
+++ b/tex/generic/context/luatex/luatex-fonts-merged.lua
@@ -1,6 +1,6 @@
 -- merged file : luatex-fonts-merged.lua
 -- parent file : luatex-fonts.lua
--- merge date  : 10/20/12 02:07:32
+-- merge date  : 10/20/12 11:51:09
 
 do -- begin closure to overcome local limits and interference