summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-02-09 13:13:19 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-02-09 13:13:19 +0000
commit979b11e5551b2daa558cd5caf9703d333b04a047 (patch)
tree5825b575aa2b5a036e70c2d5ed3d7690cfde06cd /perl-install
parenta5041faaac33ab1ef39c11f07de1ec5a77ee35ce (diff)
downloaddrakx-979b11e5551b2daa558cd5caf9703d333b04a047.tar
drakx-979b11e5551b2daa558cd5caf9703d333b04a047.tar.gz
drakx-979b11e5551b2daa558cd5caf9703d333b04a047.tar.bz2
drakx-979b11e5551b2daa558cd5caf9703d333b04a047.tar.xz
drakx-979b11e5551b2daa558cd5caf9703d333b04a047.zip
make perl_checko, the little bot, happy
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_any.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index c85de8bcf..1af25f925 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -643,9 +643,9 @@ Please insert the Cd-Rom labelled \"%s\" in your drive and press Ok when done.",
do {
askChangeMedium($o->{method}, $k)
or next;
- mountCdrom("/tmp/image", $cdrom)
- } while (!-d "/tmp/image/$m->{rpmsdir}");
- $current_medium = $k
+ mountCdrom("/tmp/image", $cdrom);
+ } while !-d "/tmp/image/$m->{rpmsdir}";
+ $current_medium = $k;
}
log::l("copying /tmp/image/$m->{rpmsdir} to $o->{prefix}/var/ftp/pub/Mandrakelinux/media");
my $wait_w = $o->wait_message(N("Please wait"), N("Copying in progress"));