1 files changed, 2 insertions, 107 deletions

diff --git a/tex/context/base/font-ibm.tex b/tex/context/base/font-ibm.tex
index 6a9fe35cd..90174be2c 100644
--- a/tex/context/base/font-ibm.tex
+++ b/tex/context/base/font-ibm.tex
@@ -1,107 +1,2 @@
-%D \module

-%D   [       file=font-ibm,

-%D        version=1995.1.1,

-%D          title=\CONTEXT\ Font Macros,

-%D       subtitle=IBM Keys,

-%D         author=Hans Hagen,

-%D           date=\currentdate,

-%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]

-%C

-%C This module is part of the \CONTEXT\ macro||package and is

-%C therefore copyrighted by \PRAGMA. Non||commercial use is 

-%C granted. 

-

-%D This module activates the \kap{IBM PC} high \ASCII\ 

-%D characters, such as � and �. 

-

-\unprotect

-

-\catcode`\�=\@@active \unexpanded\def�{\"e} 

-\catcode`\�=\@@active \unexpanded\def�{\'e}

-\catcode`\�=\@@active \unexpanded\def�{\`e}

-\catcode`\�=\@@active \unexpanded\def�{\^e} 

-

-\catcode`\�=\@@active \unexpanded\def�{\"a}

-\catcode`\�=\@@active \unexpanded\def�{\'a}

-\catcode`\�=\@@active \unexpanded\def�{\`a}

-\catcode`\�=\@@active \unexpanded\def�{\^a}

-

-\catcode`\�=\@@active \unexpanded\def�{\"o}

-\catcode`\�=\@@active \unexpanded\def�{\'o}

-\catcode`\�=\@@active \unexpanded\def�{\`o}

-\catcode`\�=\@@active \unexpanded\def�{\^o}

-

-\catcode`\�=\@@active \unexpanded\def�{\"\dotlessi}

-\catcode`\�=\@@active \unexpanded\def�{\'\dotlessi}

-\catcode`\�=\@@active \unexpanded\def�{\`\dotlessi}

-\catcode`\�=\@@active \unexpanded\def�{\^\dotlessi}

-

-\catcode`\�=\@@active \unexpanded\def�{\"u}

-\catcode`\�=\@@active \unexpanded\def�{\'u}

-\catcode`\�=\@@active \unexpanded\def�{\`u}

-\catcode`\�=\@@active \unexpanded\def�{\^u}

-

-\catcode`\�=\@@active \unexpanded\def�{\'E}

-\catcode`\�=\@@active \unexpanded\def�{\"A}

-\catcode`\�=\@@active \unexpanded\def�{\"U}

-

-\catcode`\�=\@@active \unexpanded\def�{\c c}

-\catcode`\�=\@@active \unexpanded\def�{\c C}

-

-\catcode`\�=\@@active \unexpanded\def�{\~n}

-

-\catcode`\�=\@@active \unexpanded\def�{\SS}  

-

-\catcode`\�=\@@active 

-\catcode`\�=\@@active 

-

-\unexpanded\def�{\ifvmode\leavevmode\fi\leftguillemot\prewordbreak}

-\unexpanded\def�{\prewordbreak\rightguillemot}

-

-%D The next section will be changed as soon as we get grip on

-%D the other encodings.

-%D 

-%D \starttypen

-%D \appendtoks\lccode`\"=0\to\everysanitize

-%D 

-%D \appendtoks\lccode`�=`e\to\everysanitize

-%D \appendtoks\lccode`�=`e\to\everysanitize

-%D \appendtoks\lccode`�=`e\to\everysanitize

-%D \appendtoks\lccode`�=`e\to\everysanitize

-%D 

-%D \appendtoks\lccode`�=`a\to\everysanitize

-%D \appendtoks\lccode`�=`a\to\everysanitize

-%D \appendtoks\lccode`�=`a\to\everysanitize

-%D \appendtoks\lccode`�=`a\to\everysanitize

-%D 

-%D \appendtoks\lccode`�=`o\to\everysanitize

-%D \appendtoks\lccode`�=`o\to\everysanitize

-%D \appendtoks\lccode`�=`o\to\everysanitize

-%D \appendtoks\lccode`�=`o\to\everysanitize

-%D 

-%D \appendtoks\lccode`�=`i\to\everysanitize

-%D \appendtoks\lccode`�=`i\to\everysanitize

-%D \appendtoks\lccode`�=`i\to\everysanitize

-%D \appendtoks\lccode`�=`i\to\everysanitize

-%D 

-%D \appendtoks\lccode`�=`u\to\everysanitize

-%D \appendtoks\lccode`�=`u\to\everysanitize

-%D \appendtoks\lccode`�=`u\to\everysanitize

-%D \appendtoks\lccode`�=`u\to\everysanitize

-%D 

-%D \appendtoks\lccode`�=`E\to\everysanitize

-%D \appendtoks\lccode`�=`A\to\everysanitize

-%D \appendtoks\lccode`�=`U\to\everysanitize

-%D 

-%D \appendtoks\lccode`�=`c\to\everysanitize

-%D \appendtoks\lccode`�=`c\to\everysanitize

-%D \appendtoks\lccode`�=`n\to\everysanitize

-%D \appendtoks\lccode`�=`s\to\everysanitize

-%D 

-%D \appendtoks\lccode`�=`<\to\everysanitize

-%D \appendtoks\lccode`�=`<\to\everysanitize

-%D \stoptypen

-

-\protect

-

-\endinput

+\writestatus{ENCODING}{please use \string\useencoding[ibm] instead}\wait
+\input enco-ibm.tex \endinput