summaryrefslogtreecommitdiff
path: root/tex/context/third/cyrillicnumbers/t-cyrillicnumbers.mkiv
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/third/cyrillicnumbers/t-cyrillicnumbers.mkiv')
-rw-r--r--tex/context/third/cyrillicnumbers/t-cyrillicnumbers.mkiv31
1 files changed, 16 insertions, 15 deletions
diff --git a/tex/context/third/cyrillicnumbers/t-cyrillicnumbers.mkiv b/tex/context/third/cyrillicnumbers/t-cyrillicnumbers.mkiv
index 8788c5e..79a47e6 100644
--- a/tex/context/third/cyrillicnumbers/t-cyrillicnumbers.mkiv
+++ b/tex/context/third/cyrillicnumbers/t-cyrillicnumbers.mkiv
@@ -1,13 +1,13 @@
%D \module
-%D [ file=t-cyrillicnumbers,
-%D version=2011-11-29 09:58:48+0100,
-%D title=\CONTEXT\ User Module,
-%D subtitle=Cyrillic Number Module,
-%D author=Philipp Gesang,
-%D date=\currentdate,
-%D copyright=Philipp Gesang,
-%D license=2-clause BSD,
-%D email={gesang at stud dot uni-heidelberg dot de}]
+%D [ file=t-cyrillicnumbers,
+%D version=2011-11-29 09:58:48+0100,
+%D title=\CONTEXT\ User Module,
+%D subtitle=Cyrillic Number Module,
+%D author=Philipp Gesang,
+%D date=\currentdate,
+%D copyright=Philipp Gesang,
+%D license=2-clause BSD,
+%D email={gesang at stud dot uni-heidelberg dot de}]
%D This module is licensed under the conditions of the BSD license with
%D two clauses. There is a copy in a file named "COPYING" in the
%D t-cyrillicnumbers source tree.
@@ -32,9 +32,9 @@
\startluacode
local tc = thirddata.cyrnum
tc.placetitlo = "\cyrnumparameter{titlo}"
- tc.titlospan = "\cyrnumparameter{titlospan}"
- tc.titlolocation = "\cyrnumparameter{titlolocation}"
- tc.drawdots = "\cyrnumparameter{dots}" == "yes"
+ tc.titlospan = tonumber("\cyrnumparameter{titlospan}") or false
+ tc.titlolocation = tc.last_synonyms["\cyrnumparameter{titlolocation}"] and "l" or "m"
+ tc.drawdots = tc. yes_synonyms["\cyrnumparameter{dots}"] or false
tc.dotsymbol = "\cyrnumparameter{dotsymbol}"
\stopluacode%
}
@@ -44,7 +44,7 @@
\setupcyrnum[
titlo=mp, % font|mp|no
titlospan=3, % n|all
- titlolocation=middle, % final|middle -- only effective if span ~= all
+ titlolocation=middle, % final|middle -- only effective if using the font’s titlo
dots=\v!yes, % yes|no
dotsymbol=·,
penwidth=3,
@@ -143,12 +143,12 @@
save penwidth ; penwidth = \cyrnumparameter{penwidth} ;
save High, Low ;
save Vfactor ; Vfactor = .20 ;
- save Hfactor ; Hfactor = .85 ;
+ save Hfactor ; Hfactor = .75 ;
titlo := ( 0.00, -0.8*Vfactor) {dir 90} .. {dir 90}
( 1.00, 1.2*Vfactor) ;
pickup pensquare yscaled penwidth xscaled 2 rotated 85 ;
draw titlo
- xysized (Hfactor*OverlayWidth-.5*penwidth,Vfactor*OverlayHeight)
+ xysized (Hfactor*OverlayWidth-penwidth,Vfactor*OverlayHeight)
shifted (.5*(OverlayWidth-Hfactor*OverlayWidth),OverlayHeight-Vfactor*OverlayHeight) ;
setbounds currentpicture to boundingbox OverlayBox ;
\stopuniqueMPgraphic
@@ -282,3 +282,4 @@
\unprotect \endinput
+% vi:ft=context:fo=co:ts=4:expandtab:sw=4