summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorSebastien Dupont <sdupont@mandriva.com>2001-12-22 10:39:22 +0000
committerSebastien Dupont <sdupont@mandriva.com>2001-12-22 10:39:22 +0000
commit220cf5fc0acde9524227e2c5443fd5892b5dafa1 (patch)
tree76edfba5534feeae108c232a23f70b6acec86d42 /perl-install/standalone
parent31067aa66544baa9dd0e4ab7c5d2c328a77502e1 (diff)
downloaddrakx-backup-do-not-use-220cf5fc0acde9524227e2c5443fd5892b5dafa1.tar
drakx-backup-do-not-use-220cf5fc0acde9524227e2c5443fd5892b5dafa1.tar.gz
drakx-backup-do-not-use-220cf5fc0acde9524227e2c5443fd5892b5dafa1.tar.bz2
drakx-backup-do-not-use-220cf5fc0acde9524227e2c5443fd5892b5dafa1.tar.xz
drakx-backup-do-not-use-220cf5fc0acde9524227e2c5443fd5892b5dafa1.zip
add pixmaps on backup step.
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/drakbackup26
1 files changed, 23 insertions, 3 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup
index d433e9b16..ed3842af6 100755
--- a/perl-install/standalone/drakbackup
+++ b/perl-install/standalone/drakbackup
@@ -2547,24 +2547,27 @@ sub build_backup_cd_box {
sub build_backup_box {
$box2->destroy();
+ my ($pix_cd_map, $pix_cd_mask) = gtkcreate_png("ic82-CD-40");
+ my ($pix_hd_map, $pix_hd_mask) = gtkcreate_png("ic82-discdurwhat-40");
+ my ($pix_options_map, $pix_options_mask) = gtkcreate_png("ic82-moreoption-40");
gtkadd($advanced_box,
$box2 = gtkpack_(new Gtk::HBox(0, 15),
1, new Gtk::VBox(0, 5),
1, gtkpack_(new Gtk::VBox(0, 15),
1, new Gtk::VBox(0, 5),
- 1, gtksignal_connect(new Gtk::Button(_(" Backup Now from configuration file ")),
+ 1, gtksignal_connect(my $button_from_conf_file = new Gtk::Button(),
clicked => sub { ${$central_widget}->destroy();
build_backup_box_see_conf();
}),
0, new Gtk::VBox(0, 5),
- 1, gtksignal_connect(new Gtk::Button(_(" Backup Now on CDROM ")),
+ 1, gtksignal_connect(my $button_on_cd = new Gtk::Button(),
clicked => sub { ${$central_widget}->destroy();
$where_cd = 1;
build_backup_cd_box();
}),
0, new Gtk::VBox(0, 5),
- 1, gtksignal_connect(new Gtk::Button(_(" View Backup Configuration. ")),
+ 1, gtksignal_connect(my $button_see_conf = new Gtk::Button(),
clicked => sub { ${$central_widget}->destroy();
build_backup_box_see_conf();
}),
@@ -2573,6 +2576,23 @@ sub build_backup_box {
1, new Gtk::VBox(0, 5),
),
);
+
+ $button_from_conf_file->add(gtkpack(new Gtk::HBox(0,10),
+ new Gtk::Pixmap($pix_hd_map, $pix_hd_mask),
+ new Gtk::Label(_(" Backup Now from configuration file ")),
+ new Gtk::HBox(0, 5)
+ ));
+ $button_on_cd->add(gtkpack(new Gtk::HBox(0,10),
+ new Gtk::Pixmap($pix_cd_map, $pix_cd_mask),
+ new Gtk::Label(_(" Backup Now on CDROM ")),
+ new Gtk::HBox(0, 5)
+ ));
+ $button_see_conf->add(gtkpack(new Gtk::HBox(0,10),
+ new Gtk::Pixmap($pix_options_map, $pix_options_mask),
+ new Gtk::Label(_(" View Backup Configuration. ")),
+ new Gtk::HBox(0, 5)
+ ));
+
$custom_help = "options";
button_box_restore_main();
$central_widget = \$box2;