summaryrefslogtreecommitdiffstats
path: root/perl-install/install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install')
-rw-r--r--perl-install/install/any.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm
index dbfa75183..a791cbbd4 100644
--- a/perl-install/install/any.pm
+++ b/perl-install/install/any.pm
@@ -54,7 +54,8 @@ sub spawnShell() {
return;
}
- $ENV{DISPLAY} ||= ":0"; #- why not :pp
+ #- why not :pp
+ $ENV{DISPLAY} ||= ":0" if $::o->{interactive} eq "gtk";
local *F;
sysopen F, "/dev/tty2", 2 or log::l("cannot open /dev/tty2 -- no shell will be provided: $!"), goto cant_spawn;