summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/core-new.tex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-11-18 01:37:52 +0000
committerKarl Berry <karl@freefriends.org>2006-11-18 01:37:52 +0000
commit5c91b9f8a88e06f057a6a08b0a755a224d08e019 (patch)
tree57cfafb6bd6c146dcdfc911dbef8db622c6476bd /Master/texmf-dist/tex/context/base/core-new.tex
parent983736c2ab572e9a860c74f0f781b3decd282f13 (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.tex103
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