From 6b6616e6e228c1bf9a2aaf22246c9044b77c586e Mon Sep 17 00:00:00 2001
From: Guillaume Cottenceau <gc@mandriva.com>
Date: Thu, 30 Oct 2003 22:34:40 +0000
Subject: ensure we quit at once when we can't launche X server (I want to have
 "can't launche graphical mode :(" as last msg)

---
 perl-install/install_steps_gtk.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index 3bd25cac0..8d4fb6ebc 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -129,7 +129,7 @@ sub new($$) {
 		$o->{vga16} = 1 if /VGA16/;
 		&$launchX($prog, $Driver) and goto OK;
 	    }
-            $::move and die "can't launch graphical mode :(\n";
+            $::move and print("can't launch graphical mode :(\n"), c::_exit(1);
 	}
 	return undef;
     }
-- 
cgit v1.2.1