summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-05-23 18:27:20 +0000
committerThierry Vignaud <tv@mageia.org>2012-05-23 18:27:20 +0000
commit018a572d6446c4c676c9e850347a467af2adb225 (patch)
treee035185f7bf1374bd5b18df0cc58a78950b52b49 /perl-install
parentc10299d7656ea3a780b0970795ddbca1335b96fe (diff)
downloaddrakx-018a572d6446c4c676c9e850347a467af2adb225.tar
drakx-018a572d6446c4c676c9e850347a467af2adb225.tar.gz
drakx-018a572d6446c4c676c9e850347a467af2adb225.tar.bz2
drakx-018a572d6446c4c676c9e850347a467af2adb225.tar.xz
drakx-018a572d6446c4c676c9e850347a467af2adb225.zip
(get_file_and_size) drop workaround for urpmi dying when downloader
fails and leaving us in another directory now that urpmi is fixed why didn't you fixed urpmi directly blino???
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/http.pm5
1 files changed, 0 insertions, 5 deletions
diff --git a/perl-install/install/http.pm b/perl-install/install/http.pm
index 1ddf986a1..da6d6982c 100644
--- a/perl-install/install/http.pm
+++ b/perl-install/install/http.pm
@@ -56,12 +56,7 @@ sub get_file_and_size {
urpm::download::set_cmdline_proxy(http_proxy => "http://$proxy/");
}
- (my $cwd) = getcwd() =~ /(.*)/;
my $res = eval { urpm::download::sync_url($urpm, $url, %o_options, dir => $cachedir) };
- #- urpmi does not always reset cwd when dying or failing!
- #- do not stay in /mnt/var/cache/urpmi, it's evil to be in /mnt
- #- FIXME: fix urpmi
- chdir $cwd;
if ($res) {
open(my $f, $file);