diff options
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/drakconnect | 8 | ||||
| -rwxr-xr-x | perl-install/standalone/drakfloppy | 2 | ||||
| -rwxr-xr-x | perl-install/standalone/harddrake2 | 2 |
3 files changed, 6 insertions, 6 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 90c0cb79e..19d705362 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -280,7 +280,7 @@ $window1->{window}->add( gtksignal_connect(Gtk2::Button->new(N("Cancel")), clicked => \&quit_global), gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => sub { if ($button_apply->get('sensitive')) { - my $dialog = _create_dialog(N("Please wait"), { small => 1 }); + my $dialog = _create_dialog(N("Please wait")); gtkpack($dialog->vbox, Gtk2::Label->new(N("Please Wait... Applying the configuration"))); $dialog->show_all; @@ -434,7 +434,7 @@ sub get_intf_status { sub configure_lan() { sensitive_buttons(0); - my $window = _create_dialog(N("LAN configuration"), { small => 1 }); + my $window = _create_dialog(N("LAN configuration")); my @card_tab; if (@all_cards < 1) { @@ -568,7 +568,7 @@ sub configure_net { Gtk2->main_quit; }; if (!$netcnx->{type}) { - $dialog = _create_dialog(N("LAN configuration"), { small => 1 }); + $dialog = _create_dialog(N("LAN configuration")); $dialog->vbox->add(Gtk2::Label->new(N("You don't have an Internet connection. Create one first by clicking on 'Configure'"))); gtkpack($dialog->action_area, @@ -580,7 +580,7 @@ Create one first by clicking on 'Configure'"))); } my $cnx = {}; $cnx = $netcnx->{$netcnx->{type}}; - $dialog = _create_dialog(N("Internet connection configuration"), { small => 1 }); + $dialog = _create_dialog(N("Internet connection configuration")); $dialog->signal_connect(delete_event => $exit_dialogsub); $dialog->set_border_width(10); diff --git a/perl-install/standalone/drakfloppy b/perl-install/standalone/drakfloppy index e3e01f151..1bca87d5a 100755 --- a/perl-install/standalone/drakfloppy +++ b/perl-install/standalone/drakfloppy @@ -309,7 +309,7 @@ sub build_it() { info_dialog(N("Floppy creation completed"), N("The creation of the boot floppy has been successfully completed \n")); ugtk2->exit; } else { - err_dialog(N("Error"), N("Unable to properly close mkbootdisk:\n\n<span foreground=\"Red\"><tt>%s</tt></span>", $log), { use_markup => 1, small => 1 }); + err_dialog(N("Error"), N("Unable to properly close mkbootdisk:\n\n<span foreground=\"Red\"><tt>%s</tt></span>", $log), { use_markup => 1 }); } return 0; diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 767a9a3d3..2db0049fb 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -109,7 +109,7 @@ my @menu_items = create_dialog(N("Harddrake help"), N("Description of the fields:\n\n") #-PO Do not alter the <span ..> and </span> tags - . join("\n\n", map { if_($fields{$_}[0], "<span foreground=\"royalblue3\">$fields{$_}[0]:</span> $fields{$_}[1]") } sort keys %$current_device), { use_markup => 1, if_(!$::isEmbedded, transient => $w->{window}) }) + . join("\n\n", map { if_($fields{$_}[0], "<span foreground=\"royalblue3\">$fields{$_}[0]:</span> $fields{$_}[1]") } sort keys %$current_device), { use_markup => 1, if_(!$::isEmbedded, transient => $w->{window}), height => 400 }) } else { create_dialog(N("Select a device !"), N("Once you've selected a device, you'll be able to see the device information in fields displayed on the right frame (\"Information\")"), { if_(!$::isEmbedded, transient => $w->{window}) }) |