aboutsummaryrefslogtreecommitdiffstats
path: root/emi
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-09-25 06:23:23 +0000
committerThierry Vignaud <tv@mageia.org>2012-09-25 06:23:23 +0000
commit4378ed899e56cfed1ffda1237188654de2bee350 (patch)
treec1ac6572bc3476eb9577e7270f9322c1c58cb389 /emi
parent4034fc48132cf815bf72135e55d4186d5b842acf (diff)
downloadiurt-4378ed899e56cfed1ffda1237188654de2bee350.tar
iurt-4378ed899e56cfed1ffda1237188654de2bee350.tar.gz
iurt-4378ed899e56cfed1ffda1237188654de2bee350.tar.bz2
iurt-4378ed899e56cfed1ffda1237188654de2bee350.tar.xz
iurt-4378ed899e56cfed1ffda1237188654de2bee350.zip
perl_checker cleanup
Diffstat (limited to 'emi')
-rwxr-xr-xemi4
1 files changed, 2 insertions, 2 deletions
diff --git a/emi b/emi
index ae7a5d4..c56236a 100755
--- a/emi
+++ b/emi
@@ -43,7 +43,7 @@ my $program_name = 'emi';
$run{program_name} = $program_name;
my $LOG;
-if (!$ENV{'EMI_LOG_FILE'} || !open($LOG, '>>', $ENV{'EMI_LOG_FILE'})) {
+if (!$ENV{EMI_LOG_FILE} || !open($LOG, '>>', $ENV{EMI_LOG_FILE})) {
open($LOG, ">&STDERR");
}
@@ -192,7 +192,7 @@ foreach my $prefix (sort keys %pkg_tree) {
my $ok = 1;
foreach my $section (keys %{$pkg_tree{$prefix}{section}}) {
- my @wanted_archs = defined($pkg_tree{$prefix}{section}{$section}{arch}{noarch}) ? ('noarch') : @{$config->{mandatory_arch}};
+ my @wanted_archs = defined($pkg_tree{$prefix}{section}{$section}{arch}{noarch}) ? 'noarch' : @{$config->{mandatory_arch}};
my $path = $pkg_tree{$prefix}{section}{$section}{path};
my %missing;