summaryrefslogtreecommitdiff
path: root/tex/context/base/core-uti.tex
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/core-uti.tex')
-rw-r--r--tex/context/base/core-uti.tex55
1 files changed, 2 insertions, 53 deletions
diff --git a/tex/context/base/core-uti.tex b/tex/context/base/core-uti.tex
index b91abdd3a..4ad12c31f 100644
--- a/tex/context/base/core-uti.tex
+++ b/tex/context/base/core-uti.tex
@@ -66,8 +66,8 @@
\def\thisissectionseparator#1%
{\bgroup
\globallet\checksectionseparator\relax
- \convertcommand \sectionseparator\to\asciia
- \convertargument #1\to\asciib
+ \defconvertedcommand \asciia\sectionseparator
+ \defconvertedargument\asciib{#1}%
\expanded{\gdef\noexpand\dosplitofffoliopart[####1\sectionseparator
\sectionseparator####2\sectionseparator\sectionseparator####3]{####3}}%
\ifx\asciia\asciib
@@ -189,43 +189,6 @@
\newif\ifdoinpututilities
\newif\ifunprotectutilities % voor't geval er \v!xxxxxx's zijn
-% no longer needed, since texutil is now multi platform
-%
-% \def\utilitycheckmessage
-% {\showmessage\m!systems{12}{}%
-% \globallet\utilitycheckmessage=\relax}
-%
-% \def\saveutilityline#1 #2\txen% tricky maar ok, want achter \command
-% {\if #1c% commands % in \ascii staat een spatie; #1 kan
-% \write\scratchwrite{#2}% % \par in stringvorm zijn (eof)!
-% \else\if#1s% synoniems
-% \utilitycheckmessage
-% \else\if#1r% registers
-% \utilitycheckmessage
-% \fi\fi\fi}
-%
-% \def\checkutilityfile
-% {\doiflocfileelse{\jobname.\f!outputextension}
-% {}
-% {\doiflocfileelse{\jobname.\f!inputextension}
-% {\bgroup
-% \showmessage\m!systems{11}{}%
-% \openout\scratchwrite\jobname.\f!outputextension
-% \openlocin\scratchread{\jobname.\f!inputextension}%
-% \def\doprocessline%
-% {\ifeof\scratchread
-% \def\doprocessline{\closein\scratchread}%
-% \else
-% \read\scratchread to \ascii
-% \convertcommand\ascii\to\ascii
-% \expandafter\saveutilityline\ascii\txen
-% \fi
-% \doprocessline}%
-% \doprocessline
-% \closeout\scratchwrite
-% \egroup}
-% {}}}
-
\def\currentutilityfilename{\jobname}
% \long\def\doutilities#1#2#3#4#5% % introduceren in utility file
@@ -329,20 +292,6 @@
\blank}}%
\fi
\endgroup}
-
-% Saving the sort vector:
-
-% \def\savesortkeys
-% {\startnointerference
-% \def\flushsortkey##1##2##3##4%
-% {\convertargument{##1}{##2}{##3}{##4}\to\ascii
-% \immediatewriteutility{k {\currentlanguage}{\currentencoding}\ascii}}%
-% \let\definesortkey\flushsortkey
-% \flushsortkeys
-% \globallet\savesortkeys\relax
-% \stopnointerference}
-%
-% \prependtoks \savesortkeys \to \everystarttext
% Default-instellingen (verborgen)