diff options
Diffstat (limited to 'tex/context/base/type-ini.mkiv')
-rw-r--r-- | tex/context/base/type-ini.mkiv | 23 |
1 files changed, 18 insertions, 5 deletions
diff --git a/tex/context/base/type-ini.mkiv b/tex/context/base/type-ini.mkiv index 64db2c698..fce3cd816 100644 --- a/tex/context/base/type-ini.mkiv +++ b/tex/context/base/type-ini.mkiv @@ -169,8 +169,17 @@ \egroup \expandafter\let\csname\??ts:\c!file:\currenttypefile\endcsname\loadedtypescripts} +% \def\doprocesstypescriptfile +% {\ctxlua{commands.doprocesstypescriptfile("\currenttypefile")}} + \def\doprocesstypescriptfile - {\ctxlua{commands.doprocesstypescriptfile("\currenttypefile")}} + {\startreadingfile + \pushendofline + \unprotect + \readfile{\currenttypefile.\mksuffix}\donothing{\readfile\currenttypefile\donothing\donothing}% + \protect + \popendofline + \stopreadingfile} \def\usetypescriptonce {\dotripleempty\dousetypescriptonce} @@ -472,10 +481,14 @@ \fi \fi \fi \ifmmode\mr\else\tf\fi} % needed ? -\def\usetypefile[#1]% recurses on path ! % no storage? obsolete? - %{\edef\currenttypefile{\f!typeprefix#1}% - {\edef\currenttypefile{#1}% - \ctxlua{commands.doprocesstypescriptfile("\currenttypefile")}} +% \def\usetypefile[#1]% recurses on path ! % no storage? obsolete? +% %{\edef\currenttypefile{\f!typeprefix#1}% +% {\edef\currenttypefile{#1}% +% \ctxlua{commands.doprocesstypescriptfile("\currenttypefile")}} + +\def\usetypefile[#1]% recurses on path ! + {\edef\currenttypefile{\f!typeprefix#1}% + \readfile{\currenttypefile.\mksuffix}\donothing{\readfile\currenttypefile\donothing\donothing}} %D For Taco: %D |