diff options
author | Thierry.Vignaud <thierry.vignaud@gmail.com> | 2014-05-26 14:11:43 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-05-26 22:15:28 +0200 |
commit | 6d3faeb9846f336be402f1acab8ffabf3233560f (patch) | |
tree | a806282f568f24375418408581da63ef1d32baf4 /perl-install/install/any.pm | |
parent | 645d131e5297764a853d504366f409b3952760b1 (diff) | |
download | drakx-6d3faeb9846f336be402f1acab8ffabf3233560f.tar drakx-6d3faeb9846f336be402f1acab8ffabf3233560f.tar.gz drakx-6d3faeb9846f336be402f1acab8ffabf3233560f.tar.bz2 drakx-6d3faeb9846f336be402f1acab8ffabf3233560f.tar.xz drakx-6d3faeb9846f336be402f1acab8ffabf3233560f.zip |
drop (broken) support for Alpha, PPC, Sparc & most of IA64
Including Xsun, silo & yaboot support
Rationale: it's unused/unmaintained for years and those arches are beyond
any hope of being usefull any day...
They just got in the way...
Part of IA64 support is still kept (eg: support for GPT, EFI, right xorg
driver at install, ...) as it might be usefull to extend to other arches
Next to consider: Xbox?
Diffstat (limited to 'perl-install/install/any.pm')
-rw-r--r-- | perl-install/install/any.pm | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm index c0dcb86af..09f55f200 100644 --- a/perl-install/install/any.pm +++ b/perl-install/install/any.pm @@ -859,9 +859,6 @@ sub getAndSaveAutoInstallFloppies { eval { modules::load('loop') }; - if (arch() =~ /ia64/) { - #- nothing yet - } else { my $mountdir = "$::prefix/root/aif-mount"; -d $mountdir or mkdir $mountdir, 0755; my $param = 'kickstart=floppy ' . generate_automatic_stage1_params($o); @@ -904,7 +901,6 @@ sub getAndSaveAutoInstallFloppies { } rmdir $mountdir; $img; - } } @@ -934,7 +930,7 @@ sub loadO { my $o; foreach (removable_media__early_in_install()) { my $dev = devices::make($_->{device}); - foreach my $fs (arch() =~ /sparc/ ? 'romfs' : ('ext2', 'vfat')) { + foreach my $fs (qw(ext2 vfat)) { eval { fs::mount::mount($dev, '/mnt', $fs, 'readonly'); 1 } or next; if (my $abs_f = find { -e $_ } "/mnt/$f", "/mnt/$f.pl") { $o = loadO_($O, $abs_f); |