context, from www.pragma-ade.com/context/beta/cont-tmf.zip (18apr15)

git-svn-id: svn://tug.org/texlive/trunk@36923 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 30 insertions, 1 deletions

diff --git a/Master/texmf-dist/tex/context/base/typo-drp.lua b/Master/texmf-dist/tex/context/base/typo-drp.lua
index 9151100b6f9..4bbf0b8e989 100644
--- a/Master/texmf-dist/tex/context/base/typo-drp.lua
+++ b/Master/texmf-dist/tex/context/base/typo-drp.lua
@@ -91,7 +91,27 @@ function initials.set(specification)
     texsetattribute(a_initial,1)
 end
 
-commands.setinitial = initials.set
+interfaces.implement {
+    name      = "setinitial",
+    actions   = initials.set,
+    arguments = {
+        {
+            { "location" },
+            { "enabled", "boolean" },
+            { "method" },
+            { "distance" ,"dimen" },
+            { "hoffset" ,"dimen" },
+            { "voffset" ,"dimen" },
+            { "font", "integer" },
+            { "dynamic", "integer" },
+            { "ca", "integer" },
+            { "ma", "integer" },
+            { "ta", "integer" },
+            { "n", "integer" },
+            { "m", "integer" },
+        }
+    }
+}
 
 -- dropped caps experiment (will be done properly when luatex
 -- stores the state in the local par node) .. btw, search still
@@ -324,6 +344,15 @@ actions[v_default] = function(head,setting)
                     if dynamic > 0 then
                         setattr(current,0,dynamic)
                     end
+-- apply font
+
+-- local g = nodes.copy(tonode(current))
+-- g.subtype = 0
+-- nodes.handlers.characters(g)
+-- nodes.handlers.protectglyphs(g)
+-- setfield(current,"char",g.char)
+-- nodes.free(g)
+
                     -- can be a helper
                     if ca and ca > 0 then
                         setattr(current,a_colorspace,ma == 0 and 1 or ma)