summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-12-22 20:07:36 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-12-22 20:07:36 +0000
commite1922243bd426cc4af43aa806027d3c8e1c2a810 (patch)
treea86284d78d0b3f165d5b224d4cfebcd5a899d55d /perl-install/interactive.pm
parent780e03f8220980809fa187aa442978dd2ab7cc33 (diff)
downloaddrakx-e1922243bd426cc4af43aa806027d3c8e1c2a810.tar
drakx-e1922243bd426cc4af43aa806027d3c8e1c2a810.tar.gz
drakx-e1922243bd426cc4af43aa806027d3c8e1c2a810.tar.bz2
drakx-e1922243bd426cc4af43aa806027d3c8e1c2a810.tar.xz
drakx-e1922243bd426cc4af43aa806027d3c8e1c2a810.zip
no_comment
Diffstat (limited to 'perl-install/interactive.pm')
-rw-r--r--perl-install/interactive.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index 960657ee9..300f64db2 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -42,7 +42,7 @@ sub vnew {
my ($type, $su) = @_;
$su = $su eq "su";
require c;
- if (c::Xtest($ENV{DISPLAY} ||= ":0")) {
+ if ($ENV{DISPLAY} && c::Xtest($ENV{DISPLAY})) {
if ($su) {
$ENV{PATH} = "/sbin:/usr/sbin:$ENV{PATH}";
$> and exec "kdesu", "-c", "$0 @ARGV";