diff options
Diffstat (limited to 'perl-install/install/media.pm')
| -rw-r--r-- | perl-install/install/media.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm index ee2bfbebf..e562af605 100644 --- a/perl-install/install/media.pm +++ b/perl-install/install/media.pm @@ -635,8 +635,10 @@ sub _get_media_url { if (member($phys_medium->{method}, qw(ftp http))) { $uri = $phys_medium->{url}; $uri =~ s!/media$!!; - } elsif ($phys_medium->{method} eq 'nfs') { + } elsif (member($phys_medium->{method}, qw(cdrom nfs))) { $uri = "$::prefix/$phys_medium->{mntpoint}"; + my $arch = arch() =~ /i.86/ ? $MDK::Common::System::compat_arch{arch()} : arch(); + $uri .= "/$arch" if -d "$uri/$arch"; } } else { $uri = $o->{stage2_phys_medium}{url} =~ m!^(http|ftp)://! && $o->{stage2_phys_medium}{url} || |