From e5151f1cae38b252eccde93faa63e12a33054504 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 1 Aug 2007 19:47:27 +0000 Subject: simplify --- perl-install/standalone/drakbug | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'perl-install/standalone') diff --git a/perl-install/standalone/drakbug b/perl-install/standalone/drakbug index 508eda66b..b9f7bc667 100755 --- a/perl-install/standalone/drakbug +++ b/perl-install/standalone/drakbug @@ -104,9 +104,12 @@ gtkadd($window->{window}, my $component = $app ? if_(member($app, @all_drakxtools), $app) || $mdk_app->{$app} : $product; - my $options .= 'cf_rpmpkg=' . join('-', $product, $version) if $product || $version; - $options .= '&component=Core%20Packages'; - $options .= '&classification=Mandriva%20Linux'; + my $options = join('&', + ($product || $version ? + 'cf_rpmpkg=' . join('-', $product, $version) :()), + 'component=Core%20Packages', + 'classification=Mandriva%20Linux' + ); print($bugzilla_url . "?" . $options . "\n"); require run_program; run_program::raw({ detach => 1 }, '/usr/bin/www-browser', "$bugzilla_url?$options"); -- cgit v1.2.1