From 4f7e90616fa600e3cd671638f0065340fe6d3a82 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 13 Jan 2006 09:11:07 +0000 Subject: =?UTF-8?q?unset=20DISPLAY=20so=20that=20code=20testing=20wether?= =?UTF-8?q?=20DISPLAY=20is=20set=20can=20know=20we=20don't=20have=20or=20u?= =?UTF-8?q?se=20X=20(thanks=20to=20g=C3=83=C2=A9g=C3=83=C2=A9)?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- perl-install/install_steps_newt.pm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'perl-install') diff --git a/perl-install/install_steps_newt.pm b/perl-install/install_steps_newt.pm index 203a1933c..66a9accb0 100644 --- a/perl-install/install_steps_newt.pm +++ b/perl-install/install_steps_newt.pm @@ -28,6 +28,9 @@ sub new { interactive::newt->new; + #- unset DISPLAY so that code testing wether DISPLAY is set can know we don't have or use X + delete $ENV{DISPLAY}; + banner(''); Newt::PushHelpLine( #-PO: This string must fit in a 80-char wide text screen -- cgit v1.2.1