blob: f6c97b71b81f7a13e773734b43b7f96bec2041c8 (
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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
|
%%
%% This is file `hfoldsty.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% hfoldsty.dtx (with options: `package')
%%
%% hfoldsty package
%%
%% Copyright (C) 2003--2004 Harald Harders
%%
%% This program is free software; you can redistribute it and/or
%% modify it under the terms of the GNU General Public License
%% as published by the Free Software Foundation; either version 2
%% of the License, or (at your option) any later version.
%%
%% This program is distributed in the hope that it will be useful,
%% but WITHOUT ANY WARRANTY; without even the implied warranty of
%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
%% GNU General Public License for more details.
%%
%% You should have received a copy of the GNU General Public License
%% along with this program; if not, write to the Free Software
%% Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
%%
%% h.harders@tu-bs.de
%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{hfoldsty}
[2004/09/12 v1.13 European Computer Modern with oldstyle digits]
\newif\ifhfo@oldstylett
\newif\ifhfofixcm
\DeclareOption{oldstylett}{\hfo@oldstyletttrue}
\DeclareOption{newstylett}{\hfo@oldstylettfalse}
\DeclareOption{origtt}{\hfo@oldstylettfalse}
\DeclareOption{fix-cm}{\hfofixcmtrue}
\DeclareOption*{\PassOptionsToPackage{\CurrentOption}{fontenc}}
\ExecuteOptions{origtt}
\ProcessOptions\relax
\@ifpackageloaded{fix-cm}{\hfofixcmtrue}{}
\RequirePackage[T1]{fontenc}
\ifhfofixcm
\typeout{hfoldsty: Using fewer design sizes (fix-cm)}%
\RequirePackage{fix-cm}
\else
\typeout{hfoldsty: Using all design sizes}%
\fi
\RequirePackage{ifthen}
\renewcommand\rmdefault{hfor}
\renewcommand\sfdefault{hfoss}
\ifhfo@oldstylett
\renewcommand\ttdefault{hfott}
\fi
\newcommand\hfo@oldstylenums{}
\let\hfo@oldstylenums=\oldstylenums
\DeclareRobustCommand{\oldstylenums}[1]{%
\begingroup
\renewcommand{\rmdefault}{hfor}%
\renewcommand{\sfdefault}{hfoss}%
\renewcommand{\ttdefault}{hfott}%
\newif\ifhfo@knownfamily
\hfo@knownfamilytrue
\ifthenelse{\equal{\f@family}{cmr}\or\equal{\f@family}{hfor}}{%
\fontfamily{\rmdefault}%
}{%
\ifthenelse{\equal{\f@family}{cmss}\or\equal{\f@family}{hfoss}}{%
\fontfamily{\sfdefault}%
}{%
\ifthenelse{\equal{\f@family}{cmtt}\or\equal{\f@family}{hfott}}{%
\fontfamily{\ttdefault}%
}{%
\hfo@oldstylenums{#1}\hfo@knownfamilyfalse
}%
}%
}%
\ifhfo@knownfamily
\selectfont
#1%
\fi
\endgroup
}
\DeclareRobustCommand{\newstylenums}[1]{%
\begingroup
\renewcommand{\rmdefault}{cmr}%
\renewcommand{\sfdefault}{cmss}%
\renewcommand{\ttdefault}{cmtt}%
\ifthenelse{\equal{\f@family}{hfor}}{%
\fontfamily{\rmdefault}%
}{%
\ifthenelse{\equal{\f@family}{hfoss}}{%
\fontfamily{\sfdefault}%
}{%
\ifthenelse{\equal{\f@family}{hfott}}{%
\fontfamily{\ttdefault}%
}{}%
}%
}%
\selectfont
#1%
\endgroup
}
\endinput
%%
%% End of file `hfoldsty.sty'.
|
