From e957a83be8f75792758bdeb8131a4fd08ca1c919 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Thu, 15 Mar 2012 12:17:19 +0000
Subject: (cleanrpmsrate) simplify

---
 pm/MGATools/rpmsrate.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'pm')

diff --git a/pm/MGATools/rpmsrate.pm b/pm/MGATools/rpmsrate.pm
index cd6cb27..0eee957 100644
--- a/pm/MGATools/rpmsrate.pm
+++ b/pm/MGATools/rpmsrate.pm
@@ -107,7 +107,6 @@ sub check_if_expandable {
 sub cleanrpmsrate {
     my ($rpmsrate, $output, $norpmsrate, $reprpms, $o_urpm) = @_;
     $norpmsrate ||= [];
-    open(my $LOG, ">&STDERR");
 
     my ($rsrate_ref, $poloc_ref) = preread_rpmsrate($rpmsrate, $norpmsrate);
     my @rpmsrate = @$rsrate_ref;
@@ -246,7 +245,7 @@ sub cleanrpmsrate {
 	    if (open my $A, ">$output") {
 		print $A $text;
 	    } else { 
-		print $LOG "ERROR cleanrpmsrate: cannot open $rpmsrate for writing\n";
+		warn "ERROR cleanrpmsrate: cannot open $rpmsrate for writing\n";
 		print $text;
 	    }
 	}
-- 
cgit v1.2.1