summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMartin Whitaker <mageia@martin-whitaker.me.uk>2017-12-18 17:16:57 +0000
committerMartin Whitaker <mageia@martin-whitaker.me.uk>2017-12-18 17:16:57 +0000
commitcd2fe6bf1129641d59614d6382c5819acd8252e4 (patch)
treec96d3c9da5c824ef77554a737f17187d04641cf2
parent3f2b59604f7b6e6fcbec282b86f5fea618955b4b (diff)
downloaddrakiso-cd2fe6bf1129641d59614d6382c5819acd8252e4.tar
drakiso-cd2fe6bf1129641d59614d6382c5819acd8252e4.tar.gz
drakiso-cd2fe6bf1129641d59614d6382c5819acd8252e4.tar.bz2
drakiso-cd2fe6bf1129641d59614d6382c5819acd8252e4.tar.xz
drakiso-cd2fe6bf1129641d59614d6382c5819acd8252e4.zip
Add 'use strict' to all submodules and fix up resulting error.
Except in Loopback.pm, where it introduces an unresolved error.
-rw-r--r--lib/MGA/DrakISO/Config.pm2
-rw-r--r--lib/MGA/DrakISO/CustomMedia.pm2
-rw-r--r--lib/MGA/DrakISO/Live.pm4
-rw-r--r--lib/MGA/DrakISO/Media.pm2
-rw-r--r--lib/MGA/DrakISO/Mounts.pm2
-rw-r--r--lib/MGA/DrakISO/Progress.pm2
-rw-r--r--lib/MGA/DrakISO/Storage.pm2
-rw-r--r--lib/MGA/DrakISO/StorageFS.pm2
-rw-r--r--lib/MGA/DrakISO/Utils.pm2
9 files changed, 19 insertions, 1 deletions
diff --git a/lib/MGA/DrakISO/Config.pm b/lib/MGA/DrakISO/Config.pm
index a8b8e88..9251699 100644
--- a/lib/MGA/DrakISO/Config.pm
+++ b/lib/MGA/DrakISO/Config.pm
@@ -1,5 +1,7 @@
package MGA::DrakISO::Config;
+use strict;
+
use MDK::Common;
use Pod::Usage;
use Cwd 'getcwd';
diff --git a/lib/MGA/DrakISO/CustomMedia.pm b/lib/MGA/DrakISO/CustomMedia.pm
index c01d480..821ee94 100644
--- a/lib/MGA/DrakISO/CustomMedia.pm
+++ b/lib/MGA/DrakISO/CustomMedia.pm
@@ -1,5 +1,7 @@
package MGA::DrakISO::CustomMedia;
+use strict;
+
sub nfs_media {
my ($module, $client, $path) = @_;
(
diff --git a/lib/MGA/DrakISO/Live.pm b/lib/MGA/DrakISO/Live.pm
index 6fa32af..f3e6be5 100644
--- a/lib/MGA/DrakISO/Live.pm
+++ b/lib/MGA/DrakISO/Live.pm
@@ -1,5 +1,7 @@
package MGA::DrakISO::Live;
+use strict;
+
use MDK::Common;
sub new {
@@ -10,7 +12,7 @@ sub new {
sub default_name_fields {
my ($live) = @_;
[ qw(name version product desktop),
- if_($live->{settings}{region} ne 'all', region),
+ if_($live->{settings}{region} ne 'all', $live->{settings}{region}),
qw(arch media)
];
}
diff --git a/lib/MGA/DrakISO/Media.pm b/lib/MGA/DrakISO/Media.pm
index 97e21ab..169d22d 100644
--- a/lib/MGA/DrakISO/Media.pm
+++ b/lib/MGA/DrakISO/Media.pm
@@ -1,5 +1,7 @@
package MGA::DrakISO::Media;
+use strict;
+
use MDK::Common;
use MGA::DrakISO::Storage;
use POSIX;
diff --git a/lib/MGA/DrakISO/Mounts.pm b/lib/MGA/DrakISO/Mounts.pm
index 07cd5b6..c3c408d 100644
--- a/lib/MGA/DrakISO/Mounts.pm
+++ b/lib/MGA/DrakISO/Mounts.pm
@@ -1,5 +1,7 @@
package MGA::DrakISO::Mounts;
+use strict;
+
use MDK::Common;
my $dir_distrib_sqfs = {
diff --git a/lib/MGA/DrakISO/Progress.pm b/lib/MGA/DrakISO/Progress.pm
index 40e442e..c3e55bc 100644
--- a/lib/MGA/DrakISO/Progress.pm
+++ b/lib/MGA/DrakISO/Progress.pm
@@ -1,5 +1,7 @@
package MGA::DrakISO::Progress;
+use strict;
+
use POSIX qw(strftime);
sub new {
diff --git a/lib/MGA/DrakISO/Storage.pm b/lib/MGA/DrakISO/Storage.pm
index 6402cd2..9949e76 100644
--- a/lib/MGA/DrakISO/Storage.pm
+++ b/lib/MGA/DrakISO/Storage.pm
@@ -1,5 +1,7 @@
package MGA::DrakISO::Storage;
+use strict;
+
use detect_devices;
our %storage_types = (
diff --git a/lib/MGA/DrakISO/StorageFS.pm b/lib/MGA/DrakISO/StorageFS.pm
index 05c62d4..371fb80 100644
--- a/lib/MGA/DrakISO/StorageFS.pm
+++ b/lib/MGA/DrakISO/StorageFS.pm
@@ -1,5 +1,7 @@
package MGA::DrakISO::StorageFS;
+use strict;
+
use MDK::Common;
my %storage_fs;
diff --git a/lib/MGA/DrakISO/Utils.pm b/lib/MGA/DrakISO/Utils.pm
index a2abd17..11295c9 100644
--- a/lib/MGA/DrakISO/Utils.pm
+++ b/lib/MGA/DrakISO/Utils.pm
@@ -1,5 +1,7 @@
package MGA::DrakISO::Utils;
+use strict;
+
use MDK::Common;
use common;
use fs;