From 786171ebb7723a74b841f7c1c1457bd825783a16 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Fri, 22 May 2015 22:13:46 +0200
Subject: perl_checker cleanups

---
 lib/MDV/Draklive/Mounts.pm | 20 ++++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

(limited to 'lib/MDV/Draklive/Mounts.pm')

diff --git a/lib/MDV/Draklive/Mounts.pm b/lib/MDV/Draklive/Mounts.pm
index 5bdacd7..7aea117 100644
--- a/lib/MDV/Draklive/Mounts.pm
+++ b/lib/MDV/Draklive/Mounts.pm
@@ -2,7 +2,7 @@ package MDV::Draklive::Mounts;
 
 use MDK::Common;
 
-my $_dir_distrib_sqfs = {
+my $dir_distrib_sqfs = {
     mountpoint => '/distrib',
     type => 'squashfs',
     path => '/distrib',
@@ -10,13 +10,13 @@ my $_dir_distrib_sqfs = {
     sort => "config/distrib.sort",
     build_from => '/',
 };
-my $_dir_memory = {
+my $dir_memory = {
     mountpoint => '/memory',
     type => 'tmpfs',
     mount_opts => 'mode=755',
 };
 
-my $_dir_modules = {
+my $dir_modules = {
     mountpoint => '/modules',
     type => 'modules',
     path => '/modules',
@@ -36,7 +36,7 @@ our $simple_union = {
                     mountpoint => '/media',
                     type => 'plain',
                 },
-                $_dir_memory,
+                $dir_memory,
             ],
         };
 
@@ -44,7 +44,7 @@ our $squash_rw_union = {
             root => '/union',
             overlay => 'unionfs',
             dirs => [
-                $_dir_distrib_sqfs,
+                $dir_distrib_sqfs,
                 {
                     mountpoint => '/media/system',
                     type => 'plain',
@@ -58,9 +58,9 @@ sub volatile_squash_union {
                 root => '/union',
                 overlay => 'unionfs',
                 dirs => [
-                    $_dir_distrib_sqfs,
-                    if_($o_modules, $_dir_modules),
-                    $_dir_memory,
+                    $dir_distrib_sqfs,
+                    if_($o_modules, $dir_modules),
+                    $dir_memory,
                 ],
             };
 }
@@ -71,8 +71,8 @@ sub squash_union {
                 root => '/union',
                 overlay => 'unionfs',
                 dirs => [
-                    $_dir_distrib_sqfs,
-                    if_($o_modules, $_dir_modules),
+                    $dir_distrib_sqfs,
+                    if_($o_modules, $dir_modules),
                     {
                         mountpoint => '/system',
                         type => 'loopfs',
-- 
cgit v1.2.1