trAvis - MANAGER

Edit File: psfonts.ph

#!/usr/bin/perl # # Font metrics for the PS code generator # # Font substitution lists, in order of preference my @TText = ('SourceSansPro-Bold', 'ClearSans-Bold', 'LiberationSans-Bold', 'Arial-Bold', 'Helvetica-Bold'); my @TItal = ('SourceSansPro-BoldIt', 'ClearSans-BoldItalic', 'LiberationSans-BoldItalic', 'Arial-BoldItalic', 'Helvetica-BoldItalic'); my @TCode = ('SourceCodePro-Bold', 'LiberationMono-Bold', 'Courier-Bold'); my @HText = ('SourceSansPro-Semibold', 'ClearSans-Bold', 'Arial-Bold', 'Helvetica-Bold'); my @HItal = ('SourceSansPro-SemiboldIt', 'ClearSans-BoldItalic', 'Arial-BoldItalic', 'Helvetica-BoldItalic'); my @HCode = ('SourceCodePro-Semibold', 'LiberationMono-Bold', 'Courier-Bold'); my @BText = ('SourceSansPro-Regular', 'ClearSans', 'LiberationSans', 'Arial', 'Helvetica'); my @BItal = ('SourceSansPro-It', 'ClearSans-Italic', 'LiberationSans-Italic', 'Arial-Italic', 'Helvetica-Italic'); my @BCode = ('SourceCodePro-Regular', 'LiberationMono', 'Courier'); my @QText = ('SourceSansPro-It', 'ClearSans-Italic', 'LiberationSans-Italic', 'Arial-Italic', 'Helvetica-Italic'); my @QBold = ('SourceSansPro-BoldIt', 'ClearSans-BoldItalic', 'LiberationSans-BoldItalic', 'Arial-Bold', 'Helvetica-BoldItalic'); my @QCode = ('SourceCodePro-Regular', 'LiberationMono', 'Courier'); # The fonts we want to use for various things # The order is: <normal> <emphatic> <code> %TitlFont = (name => 'tfont', leading => 24, fonts => [[20, \@TText], [20, \@TItal], [20, \@TCode]]); %ChapFont = (name => 'cfont', leading => 21.6, fonts => [[18, \@HText], [18, \@HItal], [18, \@HCode]]); %HeadFont = (name => 'hfont', leading => 16.8, fonts => [[14, \@HText], [14, \@HItal], [14, \@HCode]]); %SubhFont = (name => 'sfont', leading => 14.4, fonts => [[12, \@HText], [12, \@HItal], [12, \@HCode]]); %BodyFont = (name => 'bfont', leading => 12, fonts => [[10, \@BText], [10, \@BItal], [10, \@BCode]]); %BquoFont = (name => 'qfont', leading => 10.8, fonts => [[9, \@QText], [9, \@QBold], [9, \@QCode]]); # # List of all fontsets; used to compute the list of fonts needed # @AllFonts = ( \%TitlFont, \%ChapFont, \%HeadFont, \%SubhFont, \%BodyFont, \%BquoFont); # OK 1;