1 files changed, 43 insertions, 29 deletions
diff --git a/tex/context/base/cont-log.tex b/tex/context/base/cont-log.tex
index e2f61e819..07b208b2f 100644
--- a/tex/context/base/cont-log.tex
+++ b/tex/context/base/cont-log.tex
@@ -8,16 +8,16 @@
 %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. See mreadme.pdf for 
-%C details. 
+%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
+%C details.
 
 \writestatus{loading}{Context TeX Logos}
 
 %D The system that is used to typeset this text is called \TEX,
 %D typeset with an lowered~E. From te beginning of \TEX,
 %D authors of macro packages adapted this raising and lowering
-%D style. In this module we define some of those logos. 
-%D Watch the \type{cmr} detection hack. 
+%D style. In this module we define some of those logos.
+%D Watch the \type{cmr} detection hack.
 
 \unprotect
 
@@ -33,7 +33,7 @@
   {\doifCMRfontelse{\kern}{\scratchdimen=}}
 
 % \def\TeX
-%   {T% 
+%   {T%
 %    \kern-.1667em\lower.5ex\hbox{E}%
 %    \kern-.125emX}
 
@@ -41,7 +41,7 @@
   {{\setbox\scratchbox\hbox{M}\kern#1\wd\scratchbox}}
 
 \def\TeX
-  {T% 
+  {T%
    \Mkern{-.1667}\lower.5ex\hbox{E}%
    \Mkern{-.125}X}
 
@@ -64,7 +64,7 @@
 %   \kern-.30em\raise.3ex\hbox{\txx A}%
 %   \kern-.18em\TeX}
 
-\def\LaTeX % requested by erik frambach 
+\def\LaTeX % requested by erik frambach
   {{\setbox\scratchbox\hbox{L}%
     \scratchdimen\ht\scratchbox
     \setbox\scratchbox\hbox{\txx A}%
@@ -79,7 +79,7 @@
    \kern-.1em\lower.5ex\hbox{L}%
    \kern-.075emE}
 
-\def\PiCTeX%
+\def\PiCTeX
   {P%
    \kern-.12em\lower.5ex\hbox{I}%
    \kern-.075em C%
@@ -88,27 +88,41 @@
 \def\AMSswitch#1%
   {$\fam2\ifdim\korpsgrootte>1.1em\scriptstyle\fi#1$}
 
-\def\AmSTeX%
+\def\AmSTeX
   {\AMSswitch A%
    \kern-.1667em\lower.5ex\hbox{\AMSswitch M}%
    \kern-.125em\AMSswitch S%
    -\TeX}
 
-\def\LamSTeX%
+\def\LamSTeX
   {L%
    \kern-.4em\raise.3ex\hbox{\AMSswitch A}%
    \kern-.25em\lower.4ex\hbox{\AMSswitch M}%
    \kern-.1em{\AMSswitch S}%
    -\TeX}
 
-\def\AmSLaTeX%
+\def\AmSLaTeX
   {\AMSswitch A%
    \kern-.1667em\lower.5ex\hbox{\AMSswitch M}%
    \kern-.125em\AMSswitch S%
    -\LaTeX}
 
+%D Alternative \CONTEXT\ logo, first Idris S.~Hamid's version:
+%D
+%D
+%D \def\Context
+%D   {{\sc C\kern -.0667emo\kern -.0667emn\kern -.0549emt\kern
+%D    -.1667em\lower.5ex\hbox {e}\kern -.125emx\kern -.0549emt}}
+%D
+%D I changed this into one that adapts itself:
+
+\def\Context
+  {{C\kern -.0667em\getscaledglyph{.8}\empty{O\kern -.0667emN\kern
+   -.0549emT\doifitalicelse{\kern-.1em}{\kern-.1667em}\lower.5ex\hbox
+   {E}\doifitalicelse\empty{\kern-.11em}X\kern-.055emT}}}
+
 %D The \METAFONT\ and \METAPOST\ logos adapt themselves to the
-%D current fontsize, an ugly but usefull hack. 
+%D current fontsize, an ugly but usefull hack.
 
 \unexpanded\def\setMFPfont%
   {\font\logofont=logo%
@@ -132,8 +146,8 @@
 
 \let\logofont\nullfont
 
-\unexpanded\def\setMFPfont% more sensitive for low level changes 
-  {\font\logofont=logo% 
+\unexpanded\def\setMFPfont% more sensitive for low level changes
+  {\font\logofont=logo%
      \ifx\fontalternative\c!bf\else
      \ifx\fontalternative\c!sl\else
      \ifx\fontalternative\c!sl\else
@@ -143,34 +157,34 @@
      10 at \currentfontscale\bodyfontsize
    \logofont}
 
-%\unexpanded\def\MetaFont% 
+%\unexpanded\def\MetaFont%
 %  {\hbox{\setMFPfont METAFONT}}
 %
-%\unexpanded\def\MetaPost% 
+%\unexpanded\def\MetaPost%
 %  {\hbox{\setMFPfont METAPOST}}
 
-\def\MetaHyphen% there is no hyphenchar in this font 
+\def\MetaHyphen% there is no hyphenchar in this font
   {\discretionary{\vrule\!!height.33em\!!depth-.27em\!!width.33em}{}{}}
 
-\unexpanded\def\MetaFont% 
+\unexpanded\def\MetaFont%
   {{\setMFPfont META\MetaHyphen FONT}}
 
-\unexpanded\def\MetaPost% 
+\unexpanded\def\MetaPost%
   {{\setMFPfont META\MetaHyphen POST}}
 
-\unexpanded\def\MetaFun% 
+\unexpanded\def\MetaFun%
   {MetaFun}
 
 %D \macros
 %D  {TEX, METAFONT, METAPOST, METAFUN,
-%D   PICTEX, TABLE,      
-%D   CONTEXT, PPCHTEX, 
+%D   PICTEX, TABLE,
+%D   CONTEXT, PPCHTEX,
 %D   AMSTEX, LATEX, LAMSTEX}
-%D 
-%D We define the funny written ones as well as th eless 
-%D error prone upper case names (in \CONTEXT\ we tend to 
-%D write all user defined commands, like abbreviations, in 
-%D uppercase.) 
+%D
+%D We define the funny written ones as well as th eless
+%D error prone upper case names (in \CONTEXT\ we tend to
+%D write all user defined commands, like abbreviations, in
+%D uppercase.)
 
 \def\METAFONT {\MetaFont}
 \def\METAPOST {\MetaPost}
@@ -189,7 +203,7 @@
 %D \PiCTeX, \TaBlE, \ConTeXt, \PPCHTeX, \AmSTeX, \LaTeX,
 %D \LamSTeX. We also define some logos for the programs that
 %D we wrote and use at \PRAGMA: \TeX EDIT, \TeX FORM, \TeX
-%D ADRES, \TeX SPELL, \TeX UTIL and \TeX.  
+%D ADRES, \TeX SPELL, \TeX UTIL and \TeX.
 
 \def\TEXEDIT  {\TeX edit}
 \def\TEXFORM  {\TeX form}
@@ -198,7 +212,7 @@
 \def\TEXUTIL  {\TeX util}
 \def\TEXEXEC  {\TeX exec}
 
-%D Some placeholders: 
+%D Some placeholders:
 
 \def\eTeX     {\mathematics{\varepsilon}-\TeX}
 \def\pdfTeX   {pdf\TeX}