diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-03-15 12:17:19 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-03-15 12:17:19 +0000 |
commit | e957a83be8f75792758bdeb8131a4fd08ca1c919 (patch) | |
tree | c47acd239ae0ccb4a76a9072769b7ce8c5cb974f | |
parent | 1ffac3dcb06889eb66393531445b57af91a433a2 (diff) | |
download | mgatools-e957a83be8f75792758bdeb8131a4fd08ca1c919.tar mgatools-e957a83be8f75792758bdeb8131a4fd08ca1c919.tar.gz mgatools-e957a83be8f75792758bdeb8131a4fd08ca1c919.tar.bz2 mgatools-e957a83be8f75792758bdeb8131a4fd08ca1c919.tar.xz mgatools-e957a83be8f75792758bdeb8131a4fd08ca1c919.zip |
(cleanrpmsrate) simplify
-rw-r--r-- | pm/MGATools/rpmsrate.pm | 3 |
1 files changed, 1 insertions, 2 deletions
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; } } |