summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/back-trf.lua
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/mkiv/back-trf.lua')
-rw-r--r--tex/context/base/mkiv/back-trf.lua17
1 files changed, 13 insertions, 4 deletions
diff --git a/tex/context/base/mkiv/back-trf.lua b/tex/context/base/mkiv/back-trf.lua
index 721c856a9..1586bc440 100644
--- a/tex/context/base/mkiv/back-trf.lua
+++ b/tex/context/base/mkiv/back-trf.lua
@@ -141,14 +141,23 @@ implement { name = "stopmirroring", actions = startmirroring } -- not: stopsome
-- this could also run on top of pack-rul ... todo
+-- local function startclipping()
+-- -- context(savenode())
+-- context(literalnode("origin",formatters["q 0 w %s W n"](scanstring())))
+-- end
+--
+-- local function stopclipping()
+-- -- context(restorenode())
+-- context(literalnode("Q"))
+-- end
+
local function startclipping()
- -- context(savenode())
- context(literalnode("origin",formatters["q 0 w %s W n"](scanstring())))
+ context(savenode())
+ context(literalnode("origin",formatters["0 w %s W n"](scanstring())))
end
local function stopclipping()
- -- context(restorenode())
- context(literalnode("Q"))
+ context(restorenode())
end
implement { name = "startclipping", actions = startclipping }