From f44ec9f5132a495bc5632532abf0892ccdba4ba8 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 24 Jun 2004 08:16:45 +0000
Subject: (acceptLicense) just reboot when one cancel the globetrotter first
 time wizard

---
 perl-install/install_steps_interactive.pm | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'perl-install')

diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 28ecc1787..d7a3369bd 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;
       };
-- 
cgit v1.2.1