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.pm6
1 files changed, 0 insertions, 6 deletions
diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm
index 18e204f2f..67c786a2c 100644
--- a/perl-install/install/steps_interactive.pm
+++ b/perl-install/install/steps_interactive.pm
@@ -374,12 +374,6 @@ sub ask_change_cd_ {
local $| = 1; print "\a";
- if ($phys_m->{name} =~ /commercial/i) {
- $o->{useless_thing_accepted2} ||=
- $o->ask_from_list_('', formatAlaTeX(messages::com_license()),
- [ N_("Accept"), N_("Refuse") ], "Accept") eq "Accept" or return;
- }
-
foreach (1 .. 32) {
install::media::umount_phys_medium($phys_m);
install::media::openCdromTray($phys_m->{device});