summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-08-07 00:40:19 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-08-07 00:40:19 +0000
commit972b04c0625714c1e42ddda1fa7731517d687332 (patch)
tree539889faddd362e21f0cdd59389d3fdc41e04473 /perl-install/interactive.pm
parent3e63b2073fdb46e79ea379d656f9fa7ec2395e39 (diff)
downloaddrakx-972b04c0625714c1e42ddda1fa7731517d687332.tar
drakx-972b04c0625714c1e42ddda1fa7731517d687332.tar.gz
drakx-972b04c0625714c1e42ddda1fa7731517d687332.tar.bz2
drakx-972b04c0625714c1e42ddda1fa7731517d687332.tar.xz
drakx-972b04c0625714c1e42ddda1fa7731517d687332.zip
adding http feature, mainly for standalone tools
Diffstat (limited to 'perl-install/interactive.pm')
-rw-r--r--perl-install/interactive.pm4
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) {