diff options
| author | Olivier Blin <oblin@mandriva.com> | 2008-09-05 14:19:53 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.com> | 2008-09-05 14:19:53 +0000 |
| commit | d10539bacfc2fba17b993c26227ac68d4146eabf (patch) | |
| tree | c35ac597cc3f2e67edf3bc55d770a731f861ba80 | |
| parent | 03f3b7743eb58b6415a6dc32ae37fe466f534216 (diff) | |
| download | drakx-backup-do-not-use-d10539bacfc2fba17b993c26227ac68d4146eabf.tar drakx-backup-do-not-use-d10539bacfc2fba17b993c26227ac68d4146eabf.tar.gz drakx-backup-do-not-use-d10539bacfc2fba17b993c26227ac68d4146eabf.tar.bz2 drakx-backup-do-not-use-d10539bacfc2fba17b993c26227ac68d4146eabf.tar.xz drakx-backup-do-not-use-d10539bacfc2fba17b993c26227ac68d4146eabf.zip | |
perl_checker fixes
| -rw-r--r-- | perl-install/standalone/remove-unused-hardware-packages | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/remove-unused-hardware-packages b/perl-install/standalone/remove-unused-hardware-packages index c1fdf0747..517f47410 100644 --- a/perl-install/standalone/remove-unused-hardware-packages +++ b/perl-install/standalone/remove-unused-hardware-packages @@ -15,8 +15,8 @@ my $wait = $in->wait_message(N("Hardware packages removal"), my $do_pkgs = do_pkgs->do_pkgs($in); -my @all_hardware_packages = (pkgs::detect_hardware_packages($do_pkgs, 'match_all_hardware')); -my @used_hardware_packages = (pkgs::detect_hardware_packages($do_pkgs)); +my @all_hardware_packages = pkgs::detect_hardware_packages($do_pkgs, 'match_all_hardware'); +my @used_hardware_packages = pkgs::detect_hardware_packages($do_pkgs); my @unneeded_hardware_packages = difference2(\@all_hardware_packages, \@used_hardware_packages); my @unused_hardware_packages = $do_pkgs->are_installed(@unneeded_hardware_packages); |