diff options
| author | Daouda Lo <daouda@mandriva.com> | 2002-08-05 11:13:25 +0000 |
|---|---|---|
| committer | Daouda Lo <daouda@mandriva.com> | 2002-08-05 11:13:25 +0000 |
| commit | 74d5a8f2ef3df3519586acdb59c87ba342dd4499 (patch) | |
| tree | 39313227bd8fbc04615994a9bd3b332c922625a3 /perl-install | |
| parent | 7f0623597c4936ddaec954b4620a1a662e1df7d4 (diff) | |
| download | drakx-backup-do-not-use-74d5a8f2ef3df3519586acdb59c87ba342dd4499.tar drakx-backup-do-not-use-74d5a8f2ef3df3519586acdb59c87ba342dd4499.tar.gz drakx-backup-do-not-use-74d5a8f2ef3df3519586acdb59c87ba342dd4499.tar.bz2 drakx-backup-do-not-use-74d5a8f2ef3df3519586acdb59c87ba342dd4499.tar.xz drakx-backup-do-not-use-74d5a8f2ef3df3519586acdb59c87ba342dd4499.zip | |
- do not show empty wizard when save button clicked.
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/logdrake | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake index 3dbd34372..5cbfbf95d 100755 --- a/perl-install/standalone/logdrake +++ b/perl-install/standalone/logdrake @@ -212,18 +212,17 @@ gtkadd($window, createScrolledWindow($log_text) )) : (1, $log_text), if_(!$::isExplain, 0, gtkadd (gtkset_border_width(gtkset_layout(new Gtk::HButtonBox,-end), 5), - if_ (!$::isFile, gtksignal_connect(new Gtk::Button (_("Mail alert")), clicked => sub { eval { alert_config() }; - if ($@ =~ /wizcancel/) { - $::Wizard_no_previous = 1; - $::Wizard_no_cancel = 1; - #$::Wizard_finished = 1; -# undef $::isWizard; - $::WizardWindow->destroy if defined $::WizardWindow; - undef $::WizardWindow; -} })), - gtksignal_connect(new Gtk::Button (_("Save")), clicked => \&save), - gtksignal_connect(new Gtk::Button ($::isEmbedded ? _("Cancel") : _("Quit")), clicked => \&quit) - ) + if_(!$::isFile, gtksignal_connect(new Gtk::Button (_("Mail alert")), + clicked => sub { eval { alert_config() }; + if ($@ =~ /wizcancel/) { + $::Wizard_no_previous = 1; + $::Wizard_no_cancel = 1; + $::WizardWindow->destroy if defined $::WizardWindow; + undef $::WizardWindow; + } })), + gtksignal_connect(new Gtk::Button (_("Save")), clicked => \&save), + gtksignal_connect(new Gtk::Button ($::isEmbedded ? _("Cancel") : _("Quit")), clicked => \&quit) + ) ) ) @@ -496,6 +495,7 @@ print F $r; sub save { #$file_dialog = new Gtk::FileSelection(_("Save as..")); #$file_dialog->show(); + $::isWizard=0; $yy = $in->ask_file(_("Save as.."),"/root") or return; output($yy,$log_text->get_chars(0,$log_text->get_length())); } |