diff options
| -rw-r--r-- | perl-install/standalone.pm | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm index 4fd5e42be..7ca765a50 100644 --- a/perl-install/standalone.pm +++ b/perl-install/standalone.pm @@ -144,6 +144,17 @@ Copyright (C) 1999-2002 MandrakeSoft by <install\@mandrakesoft.com> ", $::license, "\n"; } +sub on_request_help { + my ($link) = shift; + my $browser; + if (!($browser = $ENV{BROWSER})) { + foreach (qw(mozilla konqueror galeon)) { -x "/usr/bin/$_" or next; $browser = $_;last}; + } + standalone::explanations("Connection to help system at $link"); + my $ret = system("$browser $link &"); + $ret; +} + ################################################################################ package pkgs_interactive; @@ -229,6 +240,7 @@ sub remove_nodeps { $o->{in}->resume; $ret; } + ################################################################################ |