diff options
author | Marius <mariausol@gmail.com> | 2012-05-08 15:00:12 +0300 |
---|---|---|
committer | Marius <mariausol@gmail.com> | 2012-05-08 15:00:12 +0300 |
commit | 59d36371abf5a07f5917695b57cfb0b409543d2e (patch) | |
tree | b3978c33351eba2213528631d37df05b28cf2e6f /tex/context/base/m-punk.mkiv | |
parent | ff3b8053d2d87830e9a5da94df12ab1fd13f17bb (diff) | |
download | context-59d36371abf5a07f5917695b57cfb0b409543d2e.tar.gz |
beta 2012.05.08 13:45
Diffstat (limited to 'tex/context/base/m-punk.mkiv')
-rw-r--r-- | tex/context/base/m-punk.mkiv | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tex/context/base/m-punk.mkiv b/tex/context/base/m-punk.mkiv index bae3d4de3..23b477cb6 100644 --- a/tex/context/base/m-punk.mkiv +++ b/tex/context/base/m-punk.mkiv @@ -174,7 +174,7 @@ fonts.definers.methods.install( "punkboldslanted", { { "metafont", "mfplain", "punkfont-boldslanted.mp", 10 }, } ) -typesetters.cases.actions[99] = function(current) +typesetters.cases.register("RandomPunk", function(current) local used = fontdata[current.font].variants if used then local f = math.random(1,#used) @@ -183,7 +183,7 @@ typesetters.cases.actions[99] = function(current) else return current, false end -end +end) metapost.characters.flusher = flusher @@ -206,7 +206,7 @@ statistics.register("metapost font loading",function() end) \stopluacode -\unexpanded\def\EnableRandomPunk {\setcharactercasing[99]} +\unexpanded\def\EnableRandomPunk {\setcharactercasing[RandomPunk]} \unexpanded\def\RandomPunk {\groupedcommand\EnableRandomPunk\donothing} \unexpanded\def\StartRandomPunk {\begingroup\EnableRandomPunk} \unexpanded\def\StopRandomPunk {\endgroup} |