diff options
| author | Francois Pons <fpons@mandriva.com> | 2002-01-25 10:38:50 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2002-01-25 10:38:50 +0000 |
| commit | e06775888d1d868b6d8fea170939adb05b4692a7 (patch) | |
| tree | a02caea28e630e26a0dc32d09753c62ae205a2e8 /perl-install | |
| parent | 7e1284dfe650ec6af6e4e93ffe53ca5e3c8e1ac9 (diff) | |
| download | drakx-backup-do-not-use-e06775888d1d868b6d8fea170939adb05b4692a7.tar drakx-backup-do-not-use-e06775888d1d868b6d8fea170939adb05b4692a7.tar.gz drakx-backup-do-not-use-e06775888d1d868b6d8fea170939adb05b4692a7.tar.bz2 drakx-backup-do-not-use-e06775888d1d868b6d8fea170939adb05b4692a7.tar.xz drakx-backup-do-not-use-e06775888d1d868b6d8fea170939adb05b4692a7.zip | |
cosmetic changes.
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_steps_gtk.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 96977a540..bd3f75065 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -630,7 +630,7 @@ sub installPackages { my ($method, $medium) = @_; #- if not using a cdrom medium, always abort. - $method eq 'cdrom' && !$::oem and do { + if ($method eq 'cdrom' && !$::oem) { local $my_gtk::grab = 1; my $name = pkgs::mediumDescr($o->{packages}, $medium); local $| = 1; print "\a"; @@ -643,7 +643,7 @@ If you don't have it, press Cancel to avoid installation from this Cd-Rom.", $na #- add the elapsed time (otherwise the predicted time will be rubbish) $start_time += time() - $time; return $r; - }; + } }; my $install_result; catch_cdie { $install_result = $o->install_steps::installPackages($packages); } |