3 # Font metrics for the PS code generator
6 # Font substitution lists, in order of preference
7 my @TText = ('SourceSansPro-Bold', 'ClearSans-Bold', 'LiberationSans-Bold',
8 'Arial-Bold', 'Helvetica-Bold');
9 my @TItal = ('SourceSansPro-BoldIt', 'ClearSans-BoldItalic', 'LiberationSans-BoldItalic',
10 'Arial-BoldItalic', 'Helvetica-BoldItalic');
11 my @TCode = ('SourceCodePro-Bold', 'LiberationMono-Bold', 'Courier-Bold');
12 my @HText = ('SourceSansPro-Semibold', 'ClearSans-Bold', 'Arial-Bold', 'Helvetica-Bold');
13 my @HItal = ('SourceSansPro-SemiboldIt', 'ClearSans-BoldItalic',
14 'Arial-BoldItalic', 'Helvetica-BoldItalic');
15 my @HCode = ('SourceCodePro-Semibold', 'LiberationMono-Bold', 'Courier-Bold');
16 my @BText = ('SourceSansPro-Regular', 'ClearSans', 'LiberationSans', 'Arial', 'Helvetica');
17 my @BItal = ('SourceSansPro-It', 'ClearSans-Italic', 'LiberationSans-Italic',
18 'Arial-Italic', 'Helvetica-BoldItalic');
19 my @BCode = ('SourceCodePro-Regular', 'LiberationMono', 'Courier-Bold');
21 # The fonts we want to use for various things
22 # The order is: <normal> <emphatic> <code>
24 %TitlFont = (name
=> 'tfont',
26 fonts
=> [[20, \
@TText], [20, \
@TItal], [20, \
@TCode]]);
27 %ChapFont = (name
=> 'cfont',
29 fonts
=> [[18, \
@HText], [18, \
@HItal], [18, \
@HCode]]);
30 %HeadFont = (name
=> 'hfont',
32 fonts
=> [[14, \
@HText], [14, \
@HItal], [14, \
@HCode]]);
33 %SubhFont = (name
=> 'sfont',
35 fonts
=> [[12, \
@HText], [12, \
@HItal], [12, \
@HCode]]);
36 %BodyFont = (name
=> 'bfont',
38 fonts
=> [[10, \
@BText], [10, \
@BItal], [10, \
@BCode]]);
40 # List of all fontsets; used to compute the list of fonts needed
42 @AllFonts = ( \
%TitlFont, \
%ChapFont, \
%HeadFont, \
%SubhFont, \
%BodyFont );