diff options
| author | Francois Pons <fpons@mandriva.com> | 2000-05-05 18:45:23 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2000-05-05 18:45:23 +0000 |
| commit | 969bc065596476bce5cfed0bb7ffd263f48eb1d5 (patch) | |
| tree | 8f890d39f7b1ccfa6dbeb8f7cc3281748ee30f46 /perl-install/install_steps_gtk.pm | |
| parent | 8255a2010a0698471fb35f42b1ebcad3462f153a (diff) | |
| download | drakx-969bc065596476bce5cfed0bb7ffd263f48eb1d5.tar drakx-969bc065596476bce5cfed0bb7ffd263f48eb1d5.tar.gz drakx-969bc065596476bce5cfed0bb7ffd263f48eb1d5.tar.bz2 drakx-969bc065596476bce5cfed0bb7ffd263f48eb1d5.tar.xz drakx-969bc065596476bce5cfed0bb7ffd263f48eb1d5.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
| -rw-r--r-- | perl-install/install_steps_gtk.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 37a852ecd..7807eeaa0 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -588,7 +588,10 @@ Please insert the Cd-Rom labelled \"%s\" in your drive and press Ok when done. If you don't have it, press Cancel to avoid installation from this Cd-Rom.", pkgs::mediumDescr($o->{packages}, $medium)); #- if not using a cdrom medium, always abort. - $method eq 'cdrom' && $o->ask_okcancel('', $msg); + $method eq 'cdrom' and do { + local $my_gtk::grab = 1; + $o->ask_okcancel('', $msg); + }; }; catch_cdie { $o->install_steps::installPackages($packages); } sub { @@ -770,7 +773,6 @@ sub create_steps_window { $w->set_name($t); $w->set_usize(0, 7); gtksignal_connect($w, clicked => sub { - $::no_theme_change and return; #- no theme wanted! $::setstep or return; #- just as setstep s install_theme($o, $t); die "theme_changed\n" }); |