diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-10-13 04:05:09 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-10-13 04:05:09 +0000 |
commit | 44d308e02a201611ee0cd4172ac0bc4d64a26058 (patch) | |
tree | f4568f483daefd1b1873260242a4a0d36476a9f0 /perl-install/install_steps_interactive.pm | |
parent | 19afd5251bfbd6eed2c44dd21b3066f637025f9a (diff) | |
download | drakx-backup-do-not-use-44d308e02a201611ee0cd4172ac0bc4d64a26058.tar drakx-backup-do-not-use-44d308e02a201611ee0cd4172ac0bc4d64a26058.tar.gz drakx-backup-do-not-use-44d308e02a201611ee0cd4172ac0bc4d64a26058.tar.bz2 drakx-backup-do-not-use-44d308e02a201611ee0cd4172ac0bc4d64a26058.tar.xz drakx-backup-do-not-use-44d308e02a201611ee0cd4172ac0bc4d64a26058.zip |
make perl_checker happy
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r-- | perl-install/install_steps_interactive.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 91a8ac894..a7268817d 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -422,7 +422,7 @@ sub askSupplMirror { return $o->ask_from_entry('', $message) || ''; } my $url = "ftp://$u->{mirror}$crypto::mirrors{$u->{mirror}}[1]"; - $url =~ s/\bmedia\/?$//; + $url =~ s!\bmedia/?$!!; log::l("mirror chosen [$url]"); return $url; } |