From 9f4e8e60701616c3ecc5421b178a063635c3733c Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Thu, 28 Apr 2016 17:22:21 +0200
Subject: perl_checker cleanups

---
 images/update_kernel | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'images/update_kernel')

diff --git a/images/update_kernel b/images/update_kernel
index a16513eac..e003f457b 100755
--- a/images/update_kernel
+++ b/images/update_kernel
@@ -11,7 +11,6 @@ use lib '../kernel';
 use MDK::Common;
 use list_modules;
 
-(my $karch = arch()) =~ s/^i.86$/i586/;
 my $rpm = 'rpm --nosignature';
 
 
@@ -40,7 +39,7 @@ sub rpm2version {
 sub extract_installed_rpm {
     my ($installed_dir, $kern_ver) = @_;
     my $local_dir = "all.kernels/$kern_ver";
-    mkdir_p("$local_dir");
+    mkdir_p($local_dir);
 
     sys('cp', "$installed_dir/boot/vmlinuz-$kern_ver", "$local_dir/vmlinuz");
 }
-- 
cgit v1.2.1