diff options
Diffstat (limited to 'perl-install/interactive.pm')
| -rw-r--r-- | perl-install/interactive.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm index 1815ab21e..16bf2ede6 100644 --- a/perl-install/interactive.pm +++ b/perl-install/interactive.pm @@ -58,6 +58,10 @@ sub new($) { sub vnew { my ($type, $su, $icon) = @_; $su = $su eq "su"; + if ($ENV{INTERACTIVE_HTTP}) { + require interactive_http; + return interactive_http->new; + } require c; if ($ENV{DISPLAY} && system('/usr/X11R6/bin/xtest') == 0) { if ($su) { |