doc: add a couple of stylistic alternatives

Add a few alternate font sets for the documentation.  I would be
interested to see if anyone thinks they are better.
This commit is contained in:
H. Peter Anvin 2008-06-14 12:09:25 -07:00
parent 099c939bcb
commit dfaa278cd5

View file

@ -10,37 +10,98 @@ require 'metrics/ptmri8a.ph'; # Times-Italic
require 'metrics/ptmbi8a.ph'; # Times-BoldItalic
require 'metrics/pcrr8a.ph'; # Courier
require 'metrics/pcrb8a.ph'; # Courier-Bold
require 'metrics/phvr8a.ph'; # Helvetica
require 'metrics/phvro8a.ph'; # Helvetica-Oblique
require 'metrics/phvb8a.ph'; # Helvetica-Bold
require 'metrics/phvbo8a.ph'; # Helvetica-BoldOblique
# The fonts we want to use for various things
# The order is: <normal> <emphatic> <code>
%TitlFont = (name => 'tfont',
leading => 22,
if ( 1 ) {
# Times family fonts
%TitlFont = (name => 'tfont',
leading => 22,
fonts => [[20,\%PS_Times_Bold],
[20,\%PS_Times_BoldItalic],
[20,\%PS_Courier_Bold]]);
%ChapFont = (name => 'cfont',
leading => 19.2,
fonts => [[18,\%PS_Times_Bold],
[18,\%PS_Times_BoldItalic],
[18,\%PS_Courier_Bold]]);
%HeadFont = (name => 'hfont',
leading => 15.4,
fonts => [[14,\%PS_Times_Bold],
[14,\%PS_Times_BoldItalic],
[14,\%PS_Courier_Bold]]);
%SubhFont = (name => 'sfont',
leading => 13.2,
fonts => [[12,\%PS_Times_Bold],
[12,\%PS_Times_BoldItalic],
[12,\%PS_Courier_Bold]]);
%BodyFont = (name => 'bfont',
leading => 11,
fonts => [[10,\%PS_Times_Roman],
[10,\%PS_Times_Italic],
[10,\%PS_Courier]]);
%ChapFont = (name => 'cfont',
leading => 19.2,
fonts => [[18,\%PS_Times_Bold],
[18,\%PS_Times_BoldItalic],
[18,\%PS_Courier_Bold]]);
%HeadFont = (name => 'hfont',
leading => 15.4,
fonts => [[14,\%PS_Times_Bold],
[14,\%PS_Times_BoldItalic],
[14,\%PS_Courier_Bold]]);
%SubhFont = (name => 'sfont',
leading => 13.2,
fonts => [[12,\%PS_Times_Bold],
[12,\%PS_Times_BoldItalic],
[12,\%PS_Courier_Bold]]);
%BodyFont = (name => 'bfont',
leading => 11,
fonts => [[10,\%PS_Times_Roman],
[10,\%PS_Times_Italic],
[10,\%PS_Courier]]);
} elsif ( 0 ) {
# Helvetica family fonts
%TitlFont = (name => 'tfont',
leading => 22,
fonts => [[20,\%PS_Helvetica_Bold],
[20,\%PS_Helvetica_BoldOblique],
[20,\%PS_Courier_Bold]]);
%ChapFont = (name => 'cfont',
leading => 19.2,
fonts => [[18,\%PS_Helvetica_Bold],
[18,\%PS_Helvetica_BoldOblique],
[18,\%PS_Courier_Bold]]);
%HeadFont = (name => 'hfont',
leading => 15.4,
fonts => [[14,\%PS_Helvetica_Bold],
[14,\%PS_Helvetica_BoldOblique],
[14,\%PS_Courier_Bold]]);
%SubhFont = (name => 'sfont',
leading => 13.2,
fonts => [[12,\%PS_Helvetica_Bold],
[12,\%PS_Helvetica_BoldOblique],
[12,\%PS_Courier_Bold]]);
%BodyFont = (name => 'bfont',
leading => 11,
fonts => [[10,\%PS_Helvetica],
[10,\%PS_Helvetica_Oblique],
[10,\%PS_Courier]]);
} else {
# Body text Times; headings Helvetica
%TitlFont = (name => 'tfont',
leading => 22,
fonts => [[20,\%PS_Helvetica_Bold],
[20,\%PS_Helvetica_BoldOblique],
[20,\%PS_Courier_Bold]]);
%ChapFont = (name => 'cfont',
leading => 19.2,
fonts => [[18,\%PS_Helvetica_Bold],
[18,\%PS_Helvetica_BoldOblique],
[18,\%PS_Courier_Bold]]);
%HeadFont = (name => 'hfont',
leading => 15.4,
fonts => [[14,\%PS_Helvetica_Bold],
[14,\%PS_Helvetica_BoldOblique],
[14,\%PS_Courier_Bold]]);
%SubhFont = (name => 'sfont',
leading => 13.2,
fonts => [[12,\%PS_Helvetica_Bold],
[12,\%PS_Helvetica_BoldOblique],
[12,\%PS_Courier_Bold]]);
%BodyFont = (name => 'bfont',
leading => 11,
fonts => [[10,\%PS_Times_Roman],
[10,\%PS_Times_Italic],
[10,\%PS_Courier]]);
}
#
# List of all fontsets; used to compute the list of fonts needed