From 7e6b66430f9f9bb8d97f163ac5f396246c2ac41d Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 15 Dec 2005 16:27:09 +0000
Subject: (acceptLicense) in standalone mode, when license is rejected, just
 reboot

---
 perl-install/any.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/perl-install/any.pm b/perl-install/any.pm
index 34d2dfd34..cac45fa50 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -734,6 +734,8 @@ sub acceptLicense {
 		   },
 		   [ { list => [ N_("Accept"), N_("Refuse") ], val => \$r, type => 'list', format => sub { translate($_[0]) } } ])
       or do {
+	  # when refusing license in finish-install:
+	  exec("/sbin/reboot") if !$::isInstall;
 	  if ($::globetrotter) {
            run_program::run('killall', 'Xorg');
 	      exec("/sbin/reboot");
-- 
cgit v1.2.1