summaryrefslogtreecommitdiffstats
path: root/perl-install/fs
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-03-11 00:39:24 +0000
committerThierry Vignaud <tv@mageia.org>2012-03-11 00:39:24 +0000
commit7df41f293b9f5225f52cf3c5827788aaaabdc083 (patch)
tree748e85863d691eb868efe4019c848999c51ca320 /perl-install/fs
parent6ae2a5912a7d8d0f5b9f3dbd6799eb25ea3492d3 (diff)
downloaddrakx-7df41f293b9f5225f52cf3c5827788aaaabdc083.tar
drakx-7df41f293b9f5225f52cf3c5827788aaaabdc083.tar.gz
drakx-7df41f293b9f5225f52cf3c5827788aaaabdc083.tar.bz2
drakx-7df41f293b9f5225f52cf3c5827788aaaabdc083.tar.xz
drakx-7df41f293b9f5225f52cf3c5827788aaaabdc083.zip
(type_names) kill debug print
Diffstat (limited to 'perl-install/fs')
-rw-r--r--perl-install/fs/type.pm1
1 files changed, 0 insertions, 1 deletions
diff --git a/perl-install/fs/type.pm b/perl-install/fs/type.pm
index fe5468806..12db643bc 100644
--- a/perl-install/fs/type.pm
+++ b/perl-install/fs/type.pm
@@ -188,7 +188,6 @@ sub type_names {
push @l, grep { $_ ne 'Encrypted' } @{$type_names{non_fs_type}};
push @l, sort @{$type_names{other}} if $expert;
if ($o_hd && !$o_hd->use_pt_type) {
- warn "$_ => $type_name2fs_type{$_}\n" foreach @l;
@l = grep { $type_name2fs_type{$_} } @l;
@l = uniq_ { $type_name2fs_type{$_[0]} } @l;
(@l, @{$type_names{non_fs_type}});