diff options
author | Sebastien Dupont <sdupont@mandriva.com> | 2001-12-22 10:39:22 +0000 |
---|---|---|
committer | Sebastien Dupont <sdupont@mandriva.com> | 2001-12-22 10:39:22 +0000 |
commit | 220cf5fc0acde9524227e2c5443fd5892b5dafa1 (patch) | |
tree | 76edfba5534feeae108c232a23f70b6acec86d42 /perl-install/standalone | |
parent | 31067aa66544baa9dd0e4ab7c5d2c328a77502e1 (diff) | |
download | drakx-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-x | perl-install/standalone/drakbackup | 26 |
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; |