diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-03-23 19:51:13 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-03-23 19:51:13 +0000 |
| commit | 1d51348204bb784ad4e6e46a882bd8b7e6a7f74c (patch) | |
| tree | b7b4168c1074e667cef6ac0a2f5ea058db108227 /perl-install/fs | |
| parent | 4a7d97ea9ed1ba5494a4ff164f0b957d2621918d (diff) | |
| download | drakx-backup-do-not-use-1d51348204bb784ad4e6e46a882bd8b7e6a7f74c.tar drakx-backup-do-not-use-1d51348204bb784ad4e6e46a882bd8b7e6a7f74c.tar.gz drakx-backup-do-not-use-1d51348204bb784ad4e6e46a882bd8b7e6a7f74c.tar.bz2 drakx-backup-do-not-use-1d51348204bb784ad4e6e46a882bd8b7e6a7f74c.tar.xz drakx-backup-do-not-use-1d51348204bb784ad4e6e46a882bd8b7e6a7f74c.zip | |
(type_names) perl_checker cleanup
Diffstat (limited to 'perl-install/fs')
| -rw-r--r-- | perl-install/fs/type.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/fs/type.pm b/perl-install/fs/type.pm index 74c4a5a0b..18c4f56dd 100644 --- a/perl-install/fs/type.pm +++ b/perl-install/fs/type.pm @@ -189,7 +189,7 @@ sub type_names { push @l, sort @{$type_names{other}} if $expert; if ($o_hd && !$o_hd->use_pt_type) { @l = grep { $type_name2fs_type{$_} } @l; - @l = uniq_ { $type_name2fs_type{$_[0]} } @l; + @l = uniq_ { $type_name2fs_type{$_} } @l; (@l, @{$type_names{non_fs_type}}); } else { @l; |