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/make_boot_img | 2 +-
 images/update_kernel | 3 +--
 2 files changed, 2 insertions(+), 3 deletions(-)

(limited to 'images')

diff --git a/images/make_boot_img b/images/make_boot_img
index fc843984d..32f9cab37 100755
--- a/images/make_boot_img
+++ b/images/make_boot_img
@@ -155,7 +155,7 @@ sub initrd {
     if ($ENV{DEBUGSTAGE1} || $ENV{BUILD_KA}) {
       $modules="$modules busybox ";
     }
-    $modules="$modules mgakadeploy " if ($ENV{BUILD_KA});
+    $modules="$modules mgakadeploy " if $ENV{BUILD_KA};
 
     mkdir_p("build/dracut.conf.d");
     # TODO if --nofscks and --no-hostonly are switched, dracut gives an error - fix or report upstream
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