From bbbfaa4f23a86e291e8d0ff769ea0fb571d0e7b5 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 29 Jul 1999 15:28:35 +0000 Subject: no_comment --- perl-install/Xconfigurator.pm | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index 9749884d2..8b5f151b7 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -6,6 +6,7 @@ use vars qw($in $resolution_wanted @depths @resolutions @accelservers @allserver use pci_probing::main; use common qw(:common :file); +use interactive_gtk; use log; use Xconfigurator_consts; @@ -445,6 +446,16 @@ sub main { write_XF86Config($o, "/tmp/Xconfig"); + unless (fork) { + exec "X", ":9" or exit 1; + } + + { + local $ENV{DISPLAY} = ":9"; + my $w = interactive_gtk->new; + $w->ask_yesorno("Do you see this message"); + } + # Success rewriteInittab(rc & STARTX ? 5 : 3); } -- cgit v1.2.1