summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 13b2a4acf..e3c4bbf87 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -1356,7 +1356,8 @@ Do you really want to quit now?"), 0);
ok => N("Reboot"),
},
[
- { val => \ (my $_t1 = N("Generate auto install floppy")), clicked => sub {
+ if_(arch() !~ /^ppc/,
+ { val => \ (my $_t1 = N("Generate auto install floppy")), clicked => sub {
my $t = $o->ask_from_list_('',
N("The auto install can be fully automated if wanted,
in that case it will take over the hard drive!!
@@ -1365,7 +1366,7 @@ in that case it will take over the hard drive!!
You may prefer to replay the installation.
"), [ N_("Replay"), N_("Automated") ]);
$t and $o->generateAutoInstFloppy($t eq 'Replay');
- }, advanced => 1 },
+ }, advanced => 1 }),
{ val => \ (my $_t2 = N("Save packages selection")), clicked => sub { install_any::g_default_packages($o) }, advanced => 1 },
]
) if $alldone;