From 86d8d93750b2173c59e1e6f2a6c5ffde2646b1f4 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Wed, 4 Oct 2000 17:37:41 +0000 Subject: *** empty log message *** --- perl-install/install_steps_gtk.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'perl-install/install_steps_gtk.pm') diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index e31060cf4..d4ae5563f 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -35,11 +35,11 @@ sub new($$) { unless ($::testing) { $my_gtk::force_focus = $ENV{DISPLAY} eq ":0"; - my $f = "/tmp/Xconf"; - install_gtk::createXconf($f, @{$o->{mouse}}{"XMOUSETYPE", "device"}, $o->{wacom}); - devices::make("/dev/kbd"); + if ($ENV{DISPLAY} eq ":0" && !$::live) { + my $f = "/tmp/Xconf"; + install_gtk::createXconf($f, @{$o->{mouse}}{"XMOUSETYPE", "device"}, $o->{wacom}); + devices::make("/dev/kbd"); - if ($ENV{DISPLAY} eq ":0") { local (*T1, *T2); open T1, ">/dev/tty5"; open T2, ">/dev/tty6"; -- cgit v1.2.1