summaryrefslogtreecommitdiff
path: root/fonts/utilities/vfinst/T1sw.etx
blob: 529e07fcfa66d1db3d73ba29070399e3482cd788 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
\relax

This is file T1sw.etx, part of vfinst by Alan Hoenig (ajhjj@cunyvm.cuny.edu).
It's for creating swash fonts in the T1 encoding.  This file is heavily based 
upon Alan Jeffrey's similarly-named files in the fontinst package.

\encoding

% We define the parameters for T1.etx to produce a font with old
% style digits.

\setcommand\lc#1#2{#2}
\setcommand\uc#1#2{#1swash}
\setcommand\lclig#1#2{#2}
\setcommand\uclig#1#2{#1}
\ifisglyph{zerooldstyle}\then % do oldstyle digits exist?
  \setcommand\digit#1{#1oldstyle}
\else
  \setcommand\digit#1{#1}
\fi
\setcommand\currency{dollar}
\setcommand\tty{n}

% Then we call T1.etx.

\inputetx{T1}

\endencoding