diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2009-03-11 10:05:40 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2009-03-11 10:05:40 +0000 |
| commit | 62b683d439b80acd6ef7db3646261d64c67007d7 (patch) | |
| tree | b98354ff5b79ccc99271d5efa604def9b5d6c63c /perl-install/install/media.pm | |
| parent | b9860580a86b61db3a6c22046d4c695aace573eb (diff) | |
| download | drakx-backup-do-not-use-62b683d439b80acd6ef7db3646261d64c67007d7.tar drakx-backup-do-not-use-62b683d439b80acd6ef7db3646261d64c67007d7.tar.gz drakx-backup-do-not-use-62b683d439b80acd6ef7db3646261d64c67007d7.tar.bz2 drakx-backup-do-not-use-62b683d439b80acd6ef7db3646261d64c67007d7.tar.xz drakx-backup-do-not-use-62b683d439b80acd6ef7db3646261d64c67007d7.zip | |
(_get_medium_dir) extract it from install_urpmi()
Diffstat (limited to 'perl-install/install/media.pm')
| -rw-r--r-- | perl-install/install/media.pm | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm index 9b6e5552c..76f4cf232 100644 --- a/perl-install/install/media.pm +++ b/perl-install/install/media.pm @@ -904,6 +904,15 @@ sub copy_rpms_on_disk { our $copied_rpms_on_disk = 1; } +sub _get_medium_dir { + my ($phys_m) = @_; + if ($phys_m->{method} eq 'ftp' || $phys_m->{method} eq 'http' || $phys_m->{method} eq 'cdrom') { + $phys_m->{url}; + } else { + "$phys_m->{mntpoint}$phys_m->{rel_path}"; + } +} + sub install_urpmi { my ($stage2_method, $packages) = @_; @@ -919,14 +928,11 @@ sub install_urpmi { my ($dir, $removable_device); my $phys_m = $medium->{phys_medium}; - if ($phys_m->{method} eq 'ftp' || $phys_m->{method} eq 'http' || $phys_m->{method} eq 'cdrom') { - $dir = $phys_m->{url}; - } else { - $dir = "$phys_m->{mntpoint}$phys_m->{rel_path}"; + $dir = _get_medium_dir($phys_m); + if ($phys_m->{method} eq 'iso') { $removable_device = $phys_m->{loopback_device}{mntpoint} . $phys_m->{loopback_file}; } - } $dir = MDK::Common::File::concat_symlink($dir, $medium->{rpmsdir}); |