diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2003-02-20 19:23:28 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2003-02-20 19:23:28 +0000 |
| commit | 19f5efa2b0c3cc95fe7348d56391eec57201425d (patch) | |
| tree | a636944fc082b8ac7ba03bfeee5afcf2835b73b9 /perl-install/install_steps_gtk.pm | |
| parent | 9e081044a54e5d34b23446c42cac89bcf1fa8fab (diff) | |
| download | drakx-19f5efa2b0c3cc95fe7348d56391eec57201425d.tar drakx-19f5efa2b0c3cc95fe7348d56391eec57201425d.tar.gz drakx-19f5efa2b0c3cc95fe7348d56391eec57201425d.tar.bz2 drakx-19f5efa2b0c3cc95fe7348d56391eec57201425d.tar.xz drakx-19f5efa2b0c3cc95fe7348d56391eec57201425d.zip | |
fix $check_complete use in gtk summary
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
| -rw-r--r-- | perl-install/install_steps_gtk.pm | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index cdf4cd940..1ea7832c8 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -660,10 +660,7 @@ sub summary_prompt { 0, $w->create_okcancel(undef, '', '', if_($help_sub, [ N("Help"), $help_sub, 1 ])) )); - while (1) { - $w->main; - last if $check_complete->(); - } + $w->main($check_complete); } 1; |