summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakfont6
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 834e8c0fb..503ff1d3a 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -537,7 +537,8 @@ sub interactive_mode {
$window1->set_position(1);
$window1->set_title(_("Fonts Importation"));
$window1->set_border_width(5);
-
+ my ($pix_user_map, $pix_user_mask) = gtkcreate_png("ic-drakfont-48");
+
gtkadd($window1,
gtkpack_(new Gtk::HBox(0,2),
1, gtkpack_(new Gtk::VBox(0,2),
@@ -548,7 +549,8 @@ sub interactive_mode {
1, new Gtk::VBox(0,0)
),
0, gtkpack_(new Gtk::VBox(0,5),
- 0, _("DrakFont"),
+ 0, new Gtk::VBox(0,0),
+ 0, new Gtk::Pixmap($pix_user_map, $pix_user_mask),
0, gtkadd(gtkset_layout(new Gtk::VButtonBox, -end),
gtksignal_connect(new Gtk::Button(_("Windows Importation")), clicked =>
sub { ${$central_widget}->destroy(); $windows = 1; license(\&appli_choice)}),