diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-05-22 22:13:46 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-05-22 22:17:10 +0200 |
| commit | 786171ebb7723a74b841f7c1c1457bd825783a16 (patch) | |
| tree | 459ba49d5b26ecfe2d63a19eefeaee2fadb9bba7 /lib/MDV/Draklive/Media.pm | |
| parent | 3f5f93364ec62e6384780d993d7ae24f27a43bda (diff) | |
| download | draklive-786171ebb7723a74b841f7c1c1457bd825783a16.tar draklive-786171ebb7723a74b841f7c1c1457bd825783a16.tar.gz draklive-786171ebb7723a74b841f7c1c1457bd825783a16.tar.bz2 draklive-786171ebb7723a74b841f7c1c1457bd825783a16.tar.xz draklive-786171ebb7723a74b841f7c1c1457bd825783a16.zip | |
perl_checker cleanups
Diffstat (limited to 'lib/MDV/Draklive/Media.pm')
| -rw-r--r-- | lib/MDV/Draklive/Media.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/MDV/Draklive/Media.pm b/lib/MDV/Draklive/Media.pm index c891ef0..8487e29 100644 --- a/lib/MDV/Draklive/Media.pm +++ b/lib/MDV/Draklive/Media.pm @@ -12,7 +12,7 @@ sub new { $media->{partitions} ||= [ { mntpoint => '/' } ]; - for $mntpoint (qw(/ OEM_RESCUE)) { + foreach my $mntpoint (qw(/ OEM_RESCUE)) { my $part = find { $_->{mntpoint} eq $mntpoint } @{$media->{partitions}}; $part->{fs_type} ||= $media->get_media_setting('fs'); if (my $label = $mntpoint eq '/' && $media->get_media_label) { |