summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps_interactive.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index f7d742be9..99256a617 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -87,6 +87,10 @@ sub acceptLicense {
},
[ { list => [ N_("Accept"), N_("Refuse") ], val => \$r, type => 'list', format => sub { translate($_[0]) } } ]))
or do {
+ if ($::globetrotter) {
+ system("killall XFree86");
+ exec("/sbin/reboot");
+ };
install_any::ejectCdrom();
$o->exit;
};