summaryrefslogtreecommitdiffstats
path: root/perl-install/install2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-02-13 17:42:16 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-02-13 17:42:16 +0000
commitd7d79789800c9d64ade1bd5370c03763f97bc891 (patch)
tree34ce499af4d6ea940b7d202d07f42cc93572e108 /perl-install/install2.pm
parentc4522710d2ea91148bac19b0f50ef75a8146451d (diff)
downloaddrakx-d7d79789800c9d64ade1bd5370c03763f97bc891.tar
drakx-d7d79789800c9d64ade1bd5370c03763f97bc891.tar.gz
drakx-d7d79789800c9d64ade1bd5370c03763f97bc891.tar.bz2
drakx-d7d79789800c9d64ade1bd5370c03763f97bc891.tar.xz
drakx-d7d79789800c9d64ade1bd5370c03763f97bc891.zip
in boolean context, "any" is better than "find"
Diffstat (limited to 'perl-install/install2.pm')
-rw-r--r--perl-install/install2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index bfd6b5229..2acfe1b0d 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -191,7 +191,7 @@ sub formatPartitions {
any::rotate_logs($o->{prefix});
- if (find { $_->{usb_media_type} && find { $_->{mntpoint} } partition_table::get_normal_parts($_) } @{$o->{all_hds}{hds}}) {
+ if (any { $_->{usb_media_type} && any { $_->{mntpoint} } partition_table::get_normal_parts($_) } @{$o->{all_hds}{hds}}) {
log::l("we use a usb-storage based drive, so keep it as a normal scsi_hostadapter");
} else {
log::l("we don't need usb-storage for booting system, rely on hotplug");