From 157c3f3aaf1c6ec1fc087ea061507600a01304c5 Mon Sep 17 00:00:00 2001 From: Pablo Saratxaga Date: Thu, 5 Dec 2002 16:22:18 +0000 Subject: two pango font names, for 10 and 12 sizes --- perl-install/install_gtk.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/install_gtk.pm') diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm index 30378fcf6..0174e8a26 100644 --- a/perl-install/install_gtk.pm +++ b/perl-install/install_gtk.pm @@ -45,7 +45,8 @@ sub install_theme { load_rc($_) foreach "themes-$o->{theme}", "install", "themes"; - my $pango_font_name = ""; + my $pango_font_name_10 = ""; + my $pango_font_name_12 = ""; if (my $pango_font = lang::lang2pango_font($o->{lang})) { $pango_font_name_10 = "font_name = \"$pango_font 10\"" $pango_font_name_12 = "font_name = \"$pango_font 12\"" -- cgit v1.2.1