summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/logdrake
diff options
context:
space:
mode:
authorDaouda Lo <daouda@mandriva.com>2002-08-05 11:13:25 +0000
committerDaouda Lo <daouda@mandriva.com>2002-08-05 11:13:25 +0000
commit74d5a8f2ef3df3519586acdb59c87ba342dd4499 (patch)
tree39313227bd8fbc04615994a9bd3b332c922625a3 /perl-install/standalone/logdrake
parent7f0623597c4936ddaec954b4620a1a662e1df7d4 (diff)
downloaddrakx-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/standalone/logdrake')
-rwxr-xr-xperl-install/standalone/logdrake24
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()));
}