diff options
author | Karl Berry <karl@freefriends.org> | 2006-11-18 01:37:52 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-11-18 01:37:52 +0000 |
commit | 5c91b9f8a88e06f057a6a08b0a755a224d08e019 (patch) | |
tree | 57cfafb6bd6c146dcdfc911dbef8db622c6476bd /Master/texmf-dist/tex/context/base/core-new.tex | |
parent | 983736c2ab572e9a860c74f0f781b3decd282f13 (diff) |
context 17nov06 update
git-svn-id: svn://tug.org/texlive/trunk@2449 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/context/base/core-new.tex')
-rw-r--r-- | Master/texmf-dist/tex/context/base/core-new.tex | 103 |
1 files changed, 8 insertions, 95 deletions
diff --git a/Master/texmf-dist/tex/context/base/core-new.tex b/Master/texmf-dist/tex/context/base/core-new.tex index d5de7d91ae0..35dfe48509f 100644 --- a/Master/texmf-dist/tex/context/base/core-new.tex +++ b/Master/texmf-dist/tex/context/base/core-new.tex @@ -15,56 +15,13 @@ \unprotect -% \def\setups -% {\dosingleargument\dosetups} -% -% \def\dosetups[#1]% -% {\iffirstargument -% \def\next{\dodosetups{#1}}% -% \else -% \let\next\dodosetups -% \fi -% \next} -% -% \def\dodosetups#1% -% {\processcommalist[#1]\dododosetups} -% -% \def\dododosetups#1% -% {\getvalue{\??su#1}} -% -% \def\doifsetupselse#1% -% {\doifdefinedelse{\??su#1}} -% -% \long\@EA\def\csname\e!start\v!instellingen\endcsname#1 % -% {\bgroup -% \catcode`\^^M=\@@ignore -% \xdostartsetups{#1}} -% -% \expanded -% {\long\noexpand\def\noexpand\xdostartsetups##1##2\csname\e!stop\v!instellingen\endcsname -% {\endgroup -% \long\noexpand\setvalue{\??su##1}{##2}}} -% -% \def\startsetups % for international purposes -% {\begingroup\doifnextcharelse[{\startsetupsA\stopsetups}{\startsetupsB\stopsetups}} -% -% \def\startlocalsetups % for nested purposes -% {\begingroup\doifnextcharelse[{\startsetupsA\stoplocalsetups}{\startsetupsB\stoplocalsetups}} -% -% \def\startsetupsA#1[#2]% -% {\catcode`\^^M=\@@ignore -% \dostartsetups#1{#2}} -% -% \def\startsetupsB#1#2 % space delimited -% {\startsetupsA#1[#2]}% -% -% \long\def\dostartsetups#1#2% watch out: not \grabuntil -% {\dograbuntil#1{\endgroup\long\setvalue{\??su#2}}} - % todo : \startsetups[name][XML] \setups[name][XML] % todo: \doglobal +\let\startsetups\relax % to please dep checker +\let\stopsetups \relax % to please dep checker + \expanded {\long\def\@EA\noexpand\csname\e!start\v!setups\endcsname {\begingroup\noexpand\doifnextcharelse[% @@ -86,8 +43,12 @@ \def\dosetupsB[#1]{\cleanuplabel{#1}\processcommacommand[\cleanlabel]\dosetups} % [..] \def\dosetupsC[#1]{\cleanuplabel{#1}\dosetups\cleanlabel} % [..] +% \def\dosetups#1% the grid option will be extended to other main modes +% {\executeifdefined{\??su\ifgridsnapping\v!grid\fi:#1}{\csname\??su:#1\endcsname}\empty} + \def\dosetups#1% the grid option will be extended to other main modes - {\executeifdefined{\??su\ifgridsnapping\v!grid\fi:#1}{\csname\??su:#1\endcsname}\empty} + {\executeifdefined{\??su\ifgridsnapping\v!grid\fi:#1} + {\executeifdefined{\??su :#1}\empty}} \let\directsetup\dosetups @@ -144,22 +105,6 @@ % \ifundefined{\??su\ifgridsnapping\v!grid\fi:#1}#1\else\ifgridsnapping\v!grid\fi% % #1}} -% new -% -% \startnointerference -% all kind of code -% \stopnointerference - -\newbox\nointerferencebox - -\def\startnointerference - {\setbox\nointerferencebox\vbox - \bgroup} - -\def\stopnointerference - {\egroup - \setbox\nointerferencebox\box\voidb@x} - %D new and beta % \def\defineshortcut @@ -324,37 +269,5 @@ \def\doifnotenv {\doifnotvariable \s!environment} \def\env {\getvariable \s!environment} \def\envvar {\getvariabledefault\s!environment} - -\bgroup % some day this will go away - -% actually we should handle all discretionaries here - -\gdef\cleanedupcolon{:} \catcode`:=\@@active - -\gdef\cleanuplabel#1% - {\begingroup\let:\cleanedupcolon - \xdef\cleanlabel{#1}% - \endgroup} - -\gdef\cleanupprefixedlabel#1#2% - {\begingroup\let:\cleanedupcolon - \xdef\cleanprefix{#1}% - \xdef\cleanlabel {#2}% - \endgroup} - -\gdef\protectlabels - {\let:\cleanedupcolon} - -\global\def\blabelgroup {\begingroup \let:\cleanedupcolon} -\global\let\elabelgroup \endgroup - -\gdef\labelcsname - {\begingroup\let:\cleanedupcolon - \expandafter\endgroup\csname} - -\gdef\labelvalue#1% - {\labelcsname#1\endcsname} - -\egroup \protect \endinput |