From 657b3d01707e205499e3c867cb174c7e0fa1a83e Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 20 Sep 2002 07:07:07 +0000 Subject: fixes: - don't create bogus 1 file (deush: s/2>1&/2>&1/) - don't print error messages when which cannot find the program --- perl-install/standalone/drakbug | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/standalone/drakbug') diff --git a/perl-install/standalone/drakbug b/perl-install/standalone/drakbug index c5f1e8c0e..a6715bfbd 100755 --- a/perl-install/standalone/drakbug +++ b/perl-install/standalone/drakbug @@ -174,8 +174,8 @@ sub update_app { sub get_package { my ($executable) = @_; my ($rpm_package, $which_app); - $which_app = chomp_(`which '$executable'`); - $rpm_package = chomp_(`rpm -qf '$which_app' 2>1&`); + $which_app = chomp_(`which '$executable' 2> /dev/null`); + $rpm_package = chomp_(`rpm -qf '$which_app' 2>&1`); $rpm_package; } -- cgit v1.2.1