summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorDaouda Lo <daouda@mandriva.com>2003-01-06 21:32:02 +0000
committerDaouda Lo <daouda@mandriva.com>2003-01-06 21:32:02 +0000
commite49ebe1d90239598bfb667fe6c4c23c643e75fd4 (patch)
treea32079947fe2c30a551064c21437f6bbfcb49219 /perl-install
parent67bdac233a5b875c9c404a2cf8f990f949d221dc (diff)
downloaddrakx-e49ebe1d90239598bfb667fe6c4c23c643e75fd4.tar
drakx-e49ebe1d90239598bfb667fe6c4c23c643e75fd4.tar.gz
drakx-e49ebe1d90239598bfb667fe6c4c23c643e75fd4.tar.bz2
drakx-e49ebe1d90239598bfb667fe6c4c23c643e75fd4.tar.xz
drakx-e49ebe1d90239598bfb667fe6c4c23c643e75fd4.zip
- perl checker
- no retval
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/standalone.pm5
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm
index 7ca765a50..addeb5f2d 100644
--- a/perl-install/standalone.pm
+++ b/perl-install/standalone.pm
@@ -148,11 +148,10 @@ 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};
+ 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;
+ system("$browser $link &");
}
################################################################################