From 99c2e1fca6d96d969486cbe202517a783948fedf Mon Sep 17 00:00:00 2001 From: Pascal Terjan Date: Sat, 23 Jan 2016 17:30:10 +0000 Subject: Fix perl_checker warning --- emi | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/emi b/emi index 5d8fd2f..c9efa9e 100755 --- a/emi +++ b/emi @@ -143,7 +143,7 @@ sub done_func { $pkg_tree{$prefix}{media}{$media}{excluded_arch}{$arch} = 1; } } elsif ($suffix =~ /^\.(\w+)$/) { - my ($action) = $1; + my $action = $1; if ($action eq 'upload') { plog('DEBUG', "found already uploaded ($prefix)"); $pkg_tree{$prefix}{media}{$media}{uploaded} = 1; -- cgit v1.2.1