summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakbackup48
1 files changed, 12 insertions, 36 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup
index b13cb4067..2b217215e 100755
--- a/perl-install/standalone/drakbackup
+++ b/perl-install/standalone/drakbackup
@@ -4278,12 +4278,8 @@ sub button_box_adv() {
$button_box_tmp->destroy;
gtkpack($button_box,
$button_box_tmp = gtkpack_(new Gtk2::HButtonBox,
- 0, gtksignal_connect(Gtk2::Button->new(N("Cancel")), clicked => sub {
- interactive_mode_box();
- }),
- 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => sub {
- adv_help();
- }),
+ 0, gtksignal_connect(Gtk2::Button->new(N("Cancel")), clicked => \&interactive_mode_box),
+ 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => \&adv_help),
1, new Gtk2::HBox(0, 1),
0, gtksignal_connect(Gtk2::Button->new(N("Previous")), clicked => sub {
destroy_widget();
@@ -4309,9 +4305,7 @@ sub button_box_restore_main() {
destroy_widget();
interactive_mode_box();
}),
- 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => sub {
- adv_help();
- }),
+ 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => \&adv_help),
1, new Gtk2::HBox(0, 1),
0, gtksignal_connect(Gtk2::Button->new(N("Previous")), clicked => sub {
destroy_widget();
@@ -4334,9 +4328,7 @@ sub button_box_file_restore() {
destroy_widget();
restore_box();
}),
- 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => sub {
- adv_help();
- }),
+ 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => \&adv_help),
1, new Gtk2::HBox(0, 1),
),
),
@@ -4367,9 +4359,7 @@ sub button_box_backup_end() {
destroy_widget();
interactive_mode_box()
}),
- 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => sub {
- adv_help()
- }),
+ 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => \&adv_help),
1, new Gtk2::HBox(0, 1),
0, gtksignal_connect(Gtk2::Button->new(N("Previous")), clicked => sub {
destroy_widget();
@@ -4393,9 +4383,7 @@ sub button_box_wizard_end() {
destroy_widget();
interactive_mode_box();
}),
- 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => sub {
- adv_help();
- }),
+ 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => \&adv_help),
1, new Gtk2::HBox(0, 1),
0, gtksignal_connect(Gtk2::Button->new(N("Previous")), clicked => sub {
destroy_widget();
@@ -4419,9 +4407,7 @@ sub button_box_restore_end() {
destroy_widget();
interactive_mode_box();
}),
- 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => sub {
- adv_help();
- }),
+ 0, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => \&adv_help),
1, new Gtk2::HBox(0, 1),
0, gtksignal_connect(Gtk2::Button->new(N("Previous")), clicked => sub {
destroy_widget();
@@ -4442,9 +4428,7 @@ sub button_box_build_backup_end() {
$button_box_tmp = gtkpack_(new Gtk2::HButtonBox,
1, new Gtk2::HBox(0, 5),
1, new Gtk2::HBox(0, 5),
- 0, gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => sub {
- interactive_mode_box();
- }),
+ 0, gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => \&interactive_mode_box),
),
);
}
@@ -4456,9 +4440,7 @@ sub button_box_restore_pbs_end() {
$button_box_tmp = gtkpack_(new Gtk2::HButtonBox,
1, new Gtk2::HBox(0, 5),
1, new Gtk2::HBox(0, 5),
- 1, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => sub {
- adv_help();
- }),
+ 1, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => \&adv_help),
0, gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => sub {
destroy_widget();
interactive_mode_box();
@@ -4477,9 +4459,7 @@ sub button_box_restore() {
destroy_widget();
interactive_mode_box();
}),
- 1, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => sub {
- adv_help();
- }),
+ 1, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => \&adv_help),
1, new Gtk2::HBox(0, 0),
0, gtksignal_connect(Gtk2::Button->new(N("Previous")), clicked => sub {
destroy_widget();
@@ -4531,9 +4511,7 @@ sub button_box_wizard() {
destroy_widget();
interactive_mode_box()
}),
- 1, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => sub {
- adv_help()
- }),
+ 1, gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => \&adv_help),
1, new Gtk2::HBox(0, 0),
0, gtksignal_connect(Gtk2::Button->new($previous_widget ? N("Previous") : N("Ok")), clicked => sub {
destroy_widget();
@@ -4552,9 +4530,7 @@ sub button_box_main() {
gtkpack($button_box,
$button_box_tmp = gtkpack(Gtk2::HButtonBox->new,
- gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => sub {
- adv_help()
- }),
+ gtksignal_connect(Gtk2::Button->new(N("Help")), clicked => \&adv_help),
gtksignal_connect(Gtk2::Button->new(N("Close")), clicked => sub { ugtk2->exit(0) }),
),
);