From 5f54d546a687e0615f87a117c5950b78ef346af7 Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Fri, 27 Mar 1998 00:00:00 +0100
Subject: stable 1998.03.27

---
 tex/context/base/font-pcr.tex | 85 +++++++++++++++++++++++--------------------
 1 file changed, 45 insertions(+), 40 deletions(-)

(limited to 'tex/context/base/font-pcr.tex')

diff --git a/tex/context/base/font-pcr.tex b/tex/context/base/font-pcr.tex
index 93839fe67..7251f3f48 100644
--- a/tex/context/base/font-pcr.tex
+++ b/tex/context/base/font-pcr.tex
@@ -1,40 +1,45 @@
-%D \module
-%D   [       file=font-pcr,
-%D        version=1995.1.1,
-%D          title=\CONTEXT\ Font Macros,
-%D       subtitle=Adobe Courier,
-%D         author=Hans Hagen,
-%D           date=\currentdate,
-%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]
-
-%D This module defines the Standard Adobe Courier. We use
-%D the \YandY\ texnansi encoding vector. 
-
-\startcoding[texnansi]
-
-\definecorps [14.4pt,12pt,11pt,10pt,9pt,8pt] [tt]
-  [tf=com sa 1,
-   sl=coo sa 1,
-   tfa=com sa 1.200,
-   tfb=com sa 1.440,
-   tfc=com sa 1.728,
-   tfd=com sa 2.074]
-
-\definecorps [7pt,6pt,5pt] [tt]
-  [tf=com sa 1,
-   sl=coo sa 1]
-
-\definecorps [14.4pt,12pt,11pt,10pt,9pt,8pt,7pt,6pt,5pt] [tt]
-  [tf=com sa 1,
-   sl=coo sa 1]
-
-\definecorps [14.4pt,12pt,10pt] [tt]
-  [sla=coo sa 1.200,
-   slb=coo sa 1.440,
-   slc=coo sa 1.728,
-   sld=coo sa 2.074]
-
-\stopcoding
-
-\endinput
-
\ No newline at end of file
+%D \module
+%D   [       file=font-pcr,
+%D        version=1995.1.1,
+%D          title=\CONTEXT\ Font Macros,
+%D       subtitle=Adobe Courier,
+%D         author=Hans Hagen,
+%D           date=\currentdate,
+%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]
+
+%D This module defines the Standard Adobe Courier. We use
+%D the \YandY\ texnansi encoding vector. 
+
+\startcoding[texnansi]
+
+\definebodyfont [14.4pt,12pt,11pt,10pt,9pt,8pt] [tt]
+  [tf=com sa 1,
+   sl=coo sa 1,
+   tfa=com sa 1.200,
+   tfb=com sa 1.440,
+   tfc=com sa 1.728,
+   tfd=com sa 2.074]
+
+\definebodyfont [7pt,6pt,5pt] [tt]
+  [tf=com sa 1,
+   sl=coo sa 1]
+
+\definebodyfont [14.4pt,12pt,11pt,10pt,9pt,8pt,7pt,6pt,5pt] [tt]
+  [tf=com sa 1,
+   sl=coo sa 1]
+
+\definebodyfont [14.4pt,12pt,10pt] [tt]
+  [sla=coo sa 1.200,
+   slb=coo sa 1.440,
+   slc=coo sa 1.728,
+   sld=coo sa 2.074]
+
+\stopcoding
+
+%D The Courier font does not contain \TEX's visual space. The
+%D next definition offers an alternative.
+
+\def\controlspace%
+  {\hbox{\font\next=cmtt10 at \bodyfontsize\next\char32}}
+
+\endinput
-- 
cgit v1.2.3