new fixed size and add a head pixmap (to update).

1 files changed, 34 insertions, 29 deletions

diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 503ff1d3a..d0f329e14 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -538,38 +538,43 @@ sub interactive_mode {
     $window1->set_title(_("Fonts Importation"));
     $window1->set_border_width(5);
     my ($pix_user_map, $pix_user_mask) = gtkcreate_png("ic-drakfont-48");    
+    my ($pix_u_map, $pix_u_mask) = gtkcreate_png("BDO-drakebackup1");
 
     gtkadd($window1,
-	   gtkpack_(new Gtk::HBox(0,2),
-		    1, gtkpack_(new Gtk::VBox(0,2),
-				1, new Gtk::VBox(0,0),
-				1, gtkpack(gtkset_usize($font_box = new Gtk::VBox(0,5),500, 350),
-					   $font_sel = new Gtk::FontSelection,
-					   ),
-				1, new Gtk::VBox(0,0)
-				),
-		    0, gtkpack_(new Gtk::VBox(0,5),
-				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)}),
-					  gtksignal_connect(new Gtk::Button(_("Advanced Importation")), clicked =>
-							    sub {  ${$central_widget}->destroy(); $windows = 0; license(\&advanced_install)}),
-					  gtksignal_connect(new Gtk::Button(_("Uninstall Fonts")), clicked => 
-							    sub { ${$central_widget}->destroy(); uninstall() }),
-					  gtksignal_connect(new Gtk::Button(_("Font List")), clicked 	=>
-							    sub { ${$central_widget}->destroy(); create_fontsel()}),
-					  ),
-				1, new Gtk::VBox(0,0),
-				1, gtkadd(gtkset_layout(new Gtk::VButtonBox, -end),
-					  gtksignal_connect(new Gtk::Button(_("About")), clicked => sub { 
-					       ${$central_widget}->destroy(); about() }),
+	   gtkpack_(gtkset_usize(new Gtk::VBox(0,2),,620, 390),
+		    0,  new Gtk::Pixmap($pix_u_map, $pix_u_mask),
+		    0, new Gtk::VBox(0,0),
+		    1, gtkpack_(new Gtk::HBox(0,2),
+			     1, gtkpack_(new Gtk::VBox(0,2),
+					 1, new Gtk::VBox(0,0),
+					 1, gtkpack($font_box = new Gtk::VBox(0,5),
+						    $font_sel = new Gtk::FontSelection,
+						    ),
+					 1, new Gtk::VBox(0,0)
+					 ),
+			     0, gtkpack_(new Gtk::VBox(0,5),
+					 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)}),
+						   gtksignal_connect(new Gtk::Button(_("Advanced Importation")), clicked =>
+						       sub {  ${$central_widget}->destroy(); $windows = 0; license(\&advanced_install)}),
+						   gtksignal_connect(new Gtk::Button(_("Uninstall Fonts")), clicked => 
+								     sub { ${$central_widget}->destroy(); uninstall() }),
+						   gtksignal_connect(new Gtk::Button(_("Font List")), clicked 	=>
+								     sub { ${$central_widget}->destroy(); create_fontsel()}),
+						   ),
+					 1, new Gtk::VBox(0,0),
+					 1, gtkadd(gtkset_layout(new Gtk::VButtonBox, -end),
+						   gtksignal_connect(new Gtk::Button(_("About")), clicked => sub { 
+						       ${$central_widget}->destroy(); about() }),
 					  gtksignal_connect(new Gtk::Button(_("             Help           ")), clicked => sub { 
-					       ${$central_widget}->destroy(); help() }),
-					  gtksignal_connect(new Gtk::Button(_("Close")), clicked => sub { Gtk->main_quit() }),
-					  ),
-				)
+					      ${$central_widget}->destroy(); help() }),
+						   gtksignal_connect(new Gtk::Button(_("Close")), clicked => sub { Gtk->main_quit() }),
+						   ),
+					 )
+			     ),
 		    ),
 	   );
     $central_widget = \$font_sel;