summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/lang-mis.mkiv
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/context/base/lang-mis.mkiv')
-rw-r--r--Master/texmf-dist/tex/context/base/lang-mis.mkiv14
1 files changed, 6 insertions, 8 deletions
diff --git a/Master/texmf-dist/tex/context/base/lang-mis.mkiv b/Master/texmf-dist/tex/context/base/lang-mis.mkiv
index 0df45877b0d..231697c7ee7 100644
--- a/Master/texmf-dist/tex/context/base/lang-mis.mkiv
+++ b/Master/texmf-dist/tex/context/base/lang-mis.mkiv
@@ -221,12 +221,12 @@
\def\handlemathmodediscretionary#1{\executeifdefined{\@tmd@math@\detokenize{#1}}\donothing}
\def\handletextmodediscretionary#1{\executeifdefined{\@tmd@text@\detokenize{#1}}\donothing}
-\def\installdiscretionaries#1#2{\writestatus\m!systems{use \string \installdiscretionary}} % obsolete
+\def\installdiscretionaries#1#2{\writestatus\m!system{use \string \installdiscretionary}} % obsolete
-\chardef\discretionarymode\plusone
+\setnewconstant\discretionarymode\plusone
\def\ignorediscretionaries
- {\chardef\discretionarymode\zerocount}
+ {\discretionarymode\zerocount}
\def\discretionarycommand
{% if direct if, we need \relax for lookahead in math mode
@@ -277,7 +277,7 @@
\let\domathmodediscretionary\handlemathmodediscretionary
-\def\dotextmodediscretionary#1%
+\def\dotextmodediscretionary#1% grouped !
{\bgroup
\let\nextnextnext\egroup
\def\next##1#1%
@@ -542,7 +542,7 @@
%D approach for defining the active character itself. In MK II as
%D well as in MK IV we now use the catcode vectors.
-\chardef\compoundcharactermode\plusone
+\setnewconstant\compoundcharactermode\plusone
\def\installcompoundcharacter #1#2#3 #4% {#4} no grouping
{\ifcase\compoundcharactermode
@@ -553,8 +553,6 @@
\def\!!stringa{#3}%
\@EA\def\csname\ifx\!!stringa\empty\@cc@\else\@cs@\fi\detokenize{#1#2#3}\endcsname{#4}%
\setevalue{\@cx@\detokenize{#1}}{\noexpand\handlecompoundcharacter{\detokenize{#1}}}% beter nr's
-% \@EA\letcatcodecommand\@EA\prtcatcodes\@EA\thecompoundcharacter\csname\@cx@\detokenize{#1}\endcsname
-% \@EA\letcatcodecommand\@EA\texcatcodes\@EA\thecompoundcharacter\csname\@cx@\detokenize{#1}\endcsname
\@EA\letcatcodecommand\@EA\ctxcatcodes\@EA\thecompoundcharacter\csname\@cx@\detokenize{#1}\endcsname
\fi}
@@ -574,7 +572,7 @@
%D this macro is supposed to be used grouped!
\def\ignorecompoundcharacter
- {\chardef\compoundcharactermode\zerocount}
+ {\compoundcharactermode\zerocount}
\let\restorecompoundcharacter \gobbleoneargument % obsolete
\let\enableactivediscretionaries\relax % obsolete