summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-07-21 16:50:25 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-07-21 16:50:25 +0000
commiteed27279cb92d55588681c07b700cc8c5133a933 (patch)
tree86bf5f307ba869c56ea11148b43c13bcfb688cd6 /perl-install
parent9556a305af3e501c67090f2e5274de67fc1bc17a (diff)
downloaddrakx-eed27279cb92d55588681c07b700cc8c5133a933.tar
drakx-eed27279cb92d55588681c07b700cc8c5133a933.tar.gz
drakx-eed27279cb92d55588681c07b700cc8c5133a933.tar.bz2
drakx-eed27279cb92d55588681c07b700cc8c5133a933.tar.xz
drakx-eed27279cb92d55588681c07b700cc8c5133a933.zip
mcc view: add an help button (and ugtk2-ize main window buttons btw)
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakconnect39
1 files changed, 18 insertions, 21 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect
index dbc3f934b..c1244a115 100755
--- a/perl-install/standalone/drakconnect
+++ b/perl-install/standalone/drakconnect
@@ -234,32 +234,29 @@ $window1->{window}->add(
}),
),
0, Gtk2::HSeparator->new,
- 0, $bbox0 = new Gtk2::HButtonBox,
+ 0, $bbox0 = gtkpack(Gtk2::HButtonBox->new,
+ gtksignal_connect(Gtk2::Button->new_from_stock('gtk-help'), clicked => sub {
+ exec("drakhelp Drakxtools-Guide.html/internet-connection.html") unless fork() }),
+ my $button_apply = gtksignal_connect(gtkset_sensitive(Gtk2::Button->new(N("Apply")), 0),
+ clicked => \&apply),
+ gtksignal_connect(Gtk2::Button->new_from_stock('gtk-cancel'), clicked => \&quit_global),
+ gtksignal_connect(Gtk2::Button->new_from_stock('gtk-ok'), clicked => sub {
+ my $dialog = _create_dialog(N("Please wait"));
+ gtkpack($dialog->vbox,
+ Gtk2::Label->new(N("Please Wait... Applying the configuration")));
+ $dialog->show_all;
+ gtkflush();
+ apply();
+ $dialog->destroy;
+ update();
+ quit_global();
+ }),
+ ),
),
);
$button_expert->set_active($expert_mode);
-my $button_apply = new Gtk2::Button(N("Apply"));
-$button_apply->signal_connect(clicked => \&apply);
-$button_apply->set_sensitive(0);
-$bbox0->add($button_apply);
-
-my $button_cancel = Gtk2::Button->new_from_stock('gtk-cancel');
-$button_cancel->signal_connect(clicked => \&quit_global);
-$bbox0->add($button_cancel);
-my $button_ok = Gtk2::Button->new_from_stock('gtk-ok');
-$button_ok->signal_connect(clicked => sub {
- my $dialog = _create_dialog(N("Please wait"));
- $dialog->vbox->pack_start(new Gtk2::Label(N("Please Wait... Applying the configuration")),1,1,20);
- $dialog->show_all;
- gtkflush();
- apply();
- $dialog->destroy;
- update();
- quit_global();
- });
-$bbox0->add($button_ok);
$combo1->signal_connect(realize => sub {
$combo1->entry->signal_connect(changed => sub {